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Utilities for 

Simple screen dumps, 
Vanity phone numbers, 
and a font generator 

Plus 

Design home interiors, 
Chart your biorhythms, 
and use the full 64K 

And 

An H. Allen Curtis 
Graphics Tutorial 

Paul Ladoucer's 
OS-9 Pause Command 

A Printer Buffer Project 
from Emmett J. Lewis, Jr. 
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Bouncing Boulders is a new, fast paced arcade- 
style game for your Coco. As you race your man 
around the screen you try to collect enough stars 
to open the exit to the next level. You can drop 
rocks to kill aliens that follow you around the 
screen trying to catch you. But beware of the fall- 
ing and bouncing boulders as they will crush your 
man if you get trapped under one. The many dif- 
ferent screens with lots of puzzles will keep you 
playing for hours on end. 



You've asked for it and now it's here, a wrestling 
game for your color computer. Play a single match 
or play a tag team match in this 1 to 4 player game. 
Wrestle against the computer or wrestle against 
your friend in a single or tag team match. Use pun- 
ches, kicks, body slams, back breakers and many 
other moves as you attempt to pin your opponent. 
Super graphics and realistic play action make this 
a great game for all. 
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Travel through towns and ex- 
plore strange lands in the 
ultimate fantasy role-playing 
game for the color computer, 
As you travel the land you will 
meet different characters that 
you may convince lo join you in 
your quest. During your quest 
you will learn the secrets of 
magic spells and ultimately, 
your final goal 

Enter The Gates of Delirium 
contest! The first person to 
solve the game shall be our 
grand prize winner of a Coco 3. 
There will be 5 second prizes of 
one free game from Diecom 
Products and 5 third prizes of 
one free hat from Diecom Pro- 
ducts. 

REQUIRED $38.95 u.s. 

$52.95 can 

available on disk only 



ALSO AVAILABLE 

— Paper Route, Knock Out. 
Karate, each game requiring 
64K. Tape or disk. 

$28.95 u.s. 
$38.95 can. 



6715 FIFTH LINE, MILTON, ONT., CANADA L9T 2X8 
We accept: 



cheque or money order 



24 hr. order line: 

(416) 878-8358 

personal service 9-5 



Please add $2 lor shipping 
& handling. Ontario 
residents add 7% sales tax. 
COD. Canada only. 
Dealer inquiries invited 
Looking for new software. 



From Computet Plus to YOU . . . 

PLUS PLUS 




Tandy 200 24KS649 
Tandy 600 32KS 1269 
Tandy 102 24K $395 






Color Computer 3 
W/128K Ext. Basic S169 







Tandy 1000 EX $479 
Tandy 1000 SX $759 








DMP-130$269 



Color Computer Disk Drive 
Drive $239 Drive 1 $149 




DMP-106 $160 



BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 



COMPUTERS 

Tandy 1000 EX 1 Drive 256K 479.00 

Tandy 100 SX 1 Drive 384K 679.00 

Tandy 1000 SX 2 Drive 384K 759.00 

Tandy 3000 HL 1 Drive 51 2K 1229.00 

Model IVD 64K with Deskmate 889.00 
PRINTERS 

Radio Shack DMP-106 80 CPS 160.00 

Radio Shack DMP-130 100 CPS 269.00 

Radio Shack DMP-430 180 CPS 559.00 
Radio Shack DWP-230 Daisy Wheel310.00 

Star Micronics NP-10 100 CPS 199.00 

Star Micronics NX-10 120 CPS 249.00 

Star Micronics NX-15 120 CPS 410.00 

Panasonic P-1080i 120 CPS 239.00 

Panasonic P-1091i 160 CPS 299.00 

Panasonic P-1092i 240 CPS 389.00 

Okidata 182 120 CPS 269.00 

Okidata 192 200 CPS 375.00 

Okidata 292 240 CPS 559.00 
MODEMS 

Radio Shack DCM-6 52.00 

Radio Shack DCM-7 85.00 

Radio Shack DCM-212 179.00 



COLOR COMPUTER MISC. 

Radio Shack Drive Controller 99.00 
Extended Basic Rom Kit 39.95 

64K Ram Upgrade Kit 39.00 

Radio Shack Deluxe Keyboard Kit 24.95 
HJL Keyboard Upgrade Kit 79.95 

COCO Max Y Cable 27.95 

Color Computer Mouse 44.00 

Multi Pak Interlace 89.00 

Multi Pak Pal Chip lor COCO 3 14.95 
CM-8 6 Extension Cable 19.95 

Botek Serial to Parallel Conv. 59.95 
Radio Shack Deluxe Joystick 26.95 

Radio Shack CM-8 RGB Monitor 249.00 
Radio Shack VM-4 Green Monitor 99.00 
PBJ 512K COCO 3 Upgrade 99.00 

Tandy 512K COCO 3 Upgrade 129.00 
Mark Data Universal Video Driver 29.95 
COLOR COMPUTER SOFTWARE 

TAPE DISK 
The Wild West (CoCo3) 25.95 

Worlds Ot Flight 29.95 34.95 

Mustang P-51 Flight Simul. 29.95 34.95 
Nuke the Love Boat (CoCo3) 34.95 



Practical Peripheral 1200 Baud 179.00 The Magic of Zanth (CoCo3) 



34.95 



Major Istar 24.95 27.95 

Sam Sleuth Private Eye 24.95 27.95 

Dungeon Quest 24.95 27.95 

COCO Utll II by Mark Data 39.95 
COCO Max by Colorware 69.95 

COCO Max II by Colorware 79.95 

AutoTerm by PXE Computing29.95 39.95 

TelePatch III by Spectrum 29.95 

C III Graphics by Spectrum 19.95 

Font Bonanza by Spectrum 29.95 

Telewriter 64 49.95 59.95 

Pro Color Series 79.95 

Max Fonts (72 COCO Max Fonts) 64.95 

Elite Word 80 79.95 

Elite Calc 3.0 69.95 
CoCo3512KRamDiskbyCerComp 19.95 

OS-9 Level II by Tandy 71.95 

VIP Writer (disk only) 69.95 

VIP Integrated Library (disk) 149.95 

Prices are subject to change without 
notice. Please call lor shipping charges. 
Prices in our retail store may be higher. 
Send lor complete catalog. 



CALL TOLL FREE 
1-800-343-8124 

• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

' KNOWLEDGEABLE SALES STAFF 

• TIMELY DELIVERY 

• SHOPPING CONVENIENCE 
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P.O. Box 1094 
460 King Street 
Littleton, MA 01460 



SINCE 1973 



IN MASSACHUSETTS CALL (617) 486-3193 



IRS-80 is a registered trademark ol Tandy Corp. 
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Cover illustration copyright © 1987 
by Fred Crawtord 
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FEATURES 



rJ?l The Rhythm of Ule/Steve Tenney 

ENTERTAINMENT Chart your biorhythm to predict success 

j*m That's the Ticket/ Kathryn Rocci 

^^ PRINTER UTILITY Custom-design tickets for that special affair 



Get Chart Smart/B/7/ Bernico 

TRAVEL Know where you're going with this mileage mapper 



mm The Spit and lmageA4//en Snook 

^ S * PRINTER UTILITY A simple screen dump for Tandy printers 

Vs3 A Feline CoCo 3 Fandango/H. Allen Curtis 

GRAPHICS TUTORIAL CoCo Cat shows us an interesting technique 
JJ Interiors by CoCo/Bruce K. Bell, O.D 

HOME HELP Architectural help from our favorite machine 
jpi Ma Bell Gets Personal/Robert C. Lake 

TELEPHONE UTILITY " Vanity "phone numbers just for fun 

rJl Hi-Res Simplicity/Dav/d ft Jenkins 

* 2 ™ COCO 3 UTILITY An easy-to-use font generator 

^JJ The DMP-105 Takes a Bow/ Drue King 

PRINTER UTILITY The 105 displays its screen dump talents 
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The Printer That Came in From the Code/ David ft Jenkins. 
PRINTER UTILITY Automatic printer set-up at your fingertips 

r5S P aram ' ss i° n /M' c A> ae ' Galibois 

GAME Fast and dangerous action awaits you! 
-£f| Puzzler/ Benjamin W. Brunotte 

GAME UTILITY Construct your own word search puzzles 

^*m Smarter-Than-Average Buffer/Emmefi J. Lewis, Jr. 

iiJ " HARDWARE PROJECT Have your cake and CoCo. too 

^m All in a Row/George Quellhorst 

"" PRINTER UTILITY A convenient two-column lister 

-J"1J Thanks lor the Memory/Tom Kocourek and Ken Rockwells 

J ^^ MEMORY UTILITY Use the full 64K to your advantage 

NOVICES NICHE rJI 



Way the Ball Bounces 

Ted Kyte 
Two-Tone Text 

Edward Jones 
Four Shades of Gray _ 

Pierre Salvail 
Library Labeler 
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Sized to Fit 

Forrest K. White 
Double Duty 
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Joe Perevosnik 
Printing With Style 

Blake C. Hughes 
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Alan L. Andrews 
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*m The cassette tape/disk symbols 
\Sm beside features and columns indi- 
cate that the program listings with those 
articles are on this month's RAINBOW ON 
TAPE and RAINBOW ON DISK. Those with 
only the disk symbol are not available on 
rainbow ON tape. For details, check the 

RAINBOW ON TAPE and RAINBOW ON DISK 

ads on pages 190 and 158. 



NEXT MONTH: The first warm days of summer put a song in your 
heart, and our Music Issue will add to the chorus. CoCo is a tuneful 
fellow and needs only the slightest prompting to take center stage with 
its lilting melodies. So, no matter what your musical bent, our helpful 
articles, programs, utilities, reviews and columns will have you 
dancing in the streets. 

Be sure to waltz on over to THE RAINBOW, the premier information 
source for the Color Computer 1 , 2 and 3! 
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COLUMNS 



BASIC Training/Josep/i Kolar 

The seven-value CIRCLE statement 

Building May's Rainbow/J/m Reed- 
Managing Editor's comments 



CoCo Consultations/Marfy Goodman. 
Just what the doctor ordered 



77 



16 



174 



Delphi Bureau/Cray Augsburg 

Help is just a SIG away and Goodman 's database report 

Doctor ASCl\/Richard E. Esposito 

The question fixer 

rZZk Education Notes/Sfeve Blyn 



120 



94 



112 



Scales are key to understanding maps 

Education Overview/ Michael Plog, Ph.D.. 
S-P analysis for curriculum improvements 



PRINT#-2,/ Lawrence C. Falk 
Editor's notes 



82 
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Turn ot the Screw/Tony DiStefano. 
A hardware project basics review 



^J Wishing Well/Fred Scerbo 
A new science series 



156 



38 



RAINBOWTECH 



Downloads/Dan Downard 

Answers to your technical questions 

KISSable OS-9/Da/e L. Puckett 



188 



196 



194 



Setting the stage for OS-9 Level II 

g Pause for Thought/Pau/ Ladoucer 

Avoid mistake lockups with a handy pause command 

g The Advantage of Processes/Pefer Dibble 

"Slicing" programs for greater memory 

"Barden's Buffer" and "Bits and Bytes of BASIC" return next month. 

DEPARTMENTS 
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Adventure Contest 
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Received & Certified 
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Back Issue Information 


139 


Reviewing Reviews 
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CoCo Gallery 
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Scoreboard 


168 


Corrections 


128 


Scoreboard Pointers 


170 


Letters to Rainbow 
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Submitting Material 




One-Liner Contest 
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Subscription Info 
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The Pipeline 
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Where to find Rainbow 
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LETTERS TO THE 






The Best Toy of All 



Editor. 

I have owned my CoCo for about four 
years, and can truly say I love the little 
monster. I originally bought it for creating 
title graphics to be recorded on video tape 
(I was beginning in the video business at the 
time). In four years time, that "toy" is now 
practically running my business for me! It 
is my typewriter, filing system, calendar, 
accountant, financial advisor and more. Has 
my CoCo paid for itself yet? Are you kid- 
ding? 

I finally figured out what the CoCo really 
is. It's the toy I always wanted for Christmas 
— the toy 1 never get bored with because it's 
always evolving into something more than 
it was yesterday. This is largely due to 
rainbow. Many thanks. r I W If 

Venice, CA 
Modification for Solitaire 

Editor: 

My letter appearing in the March issue 
had a modification to the Solitaire game 



from the December '86 issue. Due to a 
misprint, the clubs turn out distorted. The 
modification to Line 1230 is incorrect. 
SS(2) should read: 

R3HUEFU3GHEL3FGHD3EFD2U4RDL 

A '3' was printed in place of the G. Also, 
Line 141 should be POKE 17B, 1, instead of 
178, 2, to get red paint. 

Bill Bernico 
Sheboygan, Wl 



On the Move 

Editor: 

Anyone who is trying to get in touch with 
me (after reading "Readable Equivalents to 
C" in the November 1986 issue) needs to 
know that my address and phone number 
have changed. The new address is: 1641 
Routt Street, Lakewood, CO 80215, (303) 
233-5390. 

If you are looking for information on 
OSK (OS-9 for the 68000) feel free to write. 



as we have been using a 68020 OSK system 

for 10 months. _ , . _ , 

Calvin Dodge 

Lakewood, CO 

Adventures Unlimited 

Editor: 

Unbelievable! Thai's the only way to 
describe the terrific response I've received 
concerning The Adventure Processor [Au- 
gust 1986, Page 27]. 

In my article I included a sample method 
of implementing the verb GET into your 
Adventure "shell." Most readers have com- 
mented that 1 did not go far enough in 
showing how different verbs could be imple- 
mented. Rather than write another article 
showing how to implement various different 
verbs, I decided to write an Adventure game, 
sprinkle it generously with remark state- 
ments and make it available. I call it Dooms- 
Day. 

Bill Cook 

4346 Rhododendron Drive 

Oak Harbor. WA 98277 



The Red Tape Express 



Editor: 

Enclosed is the wrapper from my February 
rainbow. If you think it looks bad, you should 
see the magazine! 

At first, I completed a customer complaint 
card on each magazine. My post office would 
then send to the publisher for another copy for 
me. But it continued, in spite of their continual 
replies extending "regrets" and promises to do 
belter. I continued completing the complaint 
cards, but they got tired of me and told me to 
start sending for my own replacement copies. 
I did. But I also saved all the response (regrets) 
cards and when 1 had a couple pounds of them, 
I sent them off to USPS in Washington, 
marked to the attention of the Postmaster 
General. 

Pretty soon I received a letter from some 
bureaucrat expressing "regrets." If headquar- 
ters can't (won't) do anything about handling 
properly-packaged mail in the proper way, 
how can I expect the local mail people to care? 

Your packaging, with a wrapper, is by far 
the best way to go, about the only thing better 
you could do would be to send them in Tyvek 
wrappers, and I understand the expense 
THAT would mean! 

Boh Ricketts 
Terrebonne, OR 
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As you can see, we have pursued ihe 
mailer right to the top. In the mean- 
time, we suggest that others with this 
problem also contact their local post 
offices. Together, maybe we 'II gel this 
straightened out. 
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AUTOTERM 

TURNS YOUR COLOR COMPUTER INTO THE 

WORLD'S ** 

SMARTEST TERMINAL! 

YOU'LL ALSO USE AUTOTERM FOR SIMPLE 
WORD PROCESSING & RECORD KEEPING 



NOW HI-RES 



EASY COMMUNICATION + WORD PROCESSING + TOTAL AUTOMATION 



Full prompting and error checking. 
Step-by-step manual has examples. 
Scroll text backward and forward. No 
split words on screen or printout. 
Save, load, delete files while on line. 
Print, save all or any part of text. 
XMODEM for machine language 
files. 128 ASCII characters, 1200 
baud, etc. Works with D.C. Hayes or 
any modem. Handles files larger 
than memory. Print on line with J&M 
or RS232 Pak. Screen widths of 32, 
40, 42, 51, 64. 



Please hire the mentally retarded. 

They are sincere, hard working and 

appreciative. Thanks! „, „. 

^ Phyllis. 



Editing is super simple with the 
cursor. Find strings instantly too! 
Insert printer control codes. Specify 
page size and margins. Switch 
quickly between word processing 
and intelligent terminal action. Create 
text, correct your typing errors; then 
connect to the other computer, 
upload your text or files, download 
information, file it, and sign-off; then 
edit the receive data, print it in an 
attractive format, and/or save it on 
file. Compatible with TELEWRITER. 

CASSETTE $29.95 
DISKETTE $39.95 

Add $3 shipping and handling 
MC/VISA/C.O.D. 



Advanced system of keystroke 
macros lets you automate any 
activity, such as dial via modem, 
sign-on, interact, sign-off, print, save. 
Perform entire session. Act as 
message taker. At start-up, disk 
version can automatically set 
parameters, dial, sign-on, interact, 
read/write disk, sign-off, etc. Timed 
execution lets AUTOTERM work 
while you sleep or play. No other 
computer can match your COCO's 
intelligence as a terminal. 

PXE Computing 

11 Vicksburg Lane 
Richardson, Texas 75080 

214/699-7273 



That Funky Feline 

Editor: 

My favorite part of the magazine: CoCo 
Cat. It's my favorite because it makes me 
chuckle and forget how boring typing 
umpteen-dozen data lines can be. 

Walter Medak 
Edmonton, Canada 

If you like CoCo Cat, you'll defi- 
nitely like the article by H. Allen 
Curtis on Page 52 of this issue. 
Go to the Head of the Class 

Editor: 

rainbow is good, but much of it is far 

over the heads of us "freshmen" — a little 

like being dumped into the mid-year of a 

calculus class. How about a section for us 

beginners? One suspects that there will 

always be a new "class" of beginners. Those 

of you who are old hands must remember 

thai this is a foreign language to us and we 

must start at the beginning. , ,, „ 

L.K. Stamp 

Salem. SC 



BACK TALK 

Editor: 

Regarding the C03C0L0R program in the 
March 1 987 "Bits and Bytes of BASIC" in 
Line 40, the first HBUFF2.98 should be 
H8UFF2.90B. If you are seeing three green 
dots next to the numbers, just make this 

change ' PaulEMorin 

Woonsocket, RI 



Correction: No Correction Needed 

Editor: 

Concerning Marty Goodman's comment 
[November 1986] on J & R's BANKER 
memory expansions, Marty misleadingly 
states that a hardware correction is required 
for our BANKER memory expansion for 
CoCo I and 2 to be compatible with certain 
software. There is no correction required! 

We have always provided both hardware 
(64K switch) and software CLRFIX.BflS 
solutions to compatibility problems. We 
support our product and are available to 
help users with their problems. When the 
64K switch is on, the BANKER is absolutely 
1 00 percent compatible with any CoCo I or 
CoCo 2 software; we guarantee that! 

The partial fix Marty mentions involves 
connecting the 6809's LIC signal (Pin 38) to 
an unused input of the BANKER'S address 
decoder (74LS133). This prevents a CLR 
opcode from reading the BANKER latch 
before writing zeros to the data bus. The 
CLRFIX program included in our 
BANKER software performs the same fix, 
with no soldering required. 

The above fix does not prevent an instruc- 
tion such as LDA SFFCO or LDA 0,X from 
reprogramming the latch, as some memory 
sense routines do. The solution here is to 
toggle the 64K switch on when loading such 
programs or to use our software and support 
to fix the offending program. 

By the way, our CoCo 3 512K JramR 
upgrade is absolutely compatible with 



Radio Shack's 512K upgrade and runs all 
CoCo 3 software. 

In summary, we do not recommend the fix 
that Marty speaks about. A hardware 
"correction" is neither required nor needed. 
From day one of J & R, we have provided 
complete memory systems, backed by our 
support. Ours was the first complete (hard- 
ware and software) 256K and 512K upgrade 
for CoCo l and CoCo 2, and we were first 
again with a complete CoCo 3 5I2K up- 
grade. You'll never get a memory expansion 
from us without software to run on it and 
documentation to get the maximum benefit 

from it! , ... . , 

Jesse W. Jackson 

J & R Electronics 



COCO 3 

Editor: 

If you are trying to run your printer 
through a Metric Industries interface and 
your CoCo 3 doesn't recognize the pokes for 
4800 or 9600 baud, the problem is with the 
CoCo 3, not the interface. We were advised 
by Radio Shack's hardware support group 
in Fort Worth that the CoCo 3 was not 
designed to go faster than 2400 baud. 
However, they could not explain why our, 
and other, CoCo 3s run at these higher 
speeds. It seems that some will and some 
won't. Don't feel that CoCo 3 is inferior 
because of this. Most printers in use by the 
CoCo community cannot print faster than 
2400 baud, due to the printer's mechanical 
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limitations. In most cases you will see no 

difference in printer speed between 2400 and 

9600 baud. _ ,, 

Don Horn 

President, Metric Industries 

For the Price of a 'Box' 
Editor: 

I am a CoCo I user. I saw the articles in 
your September 1986 issue about the CoCo 
3 and 1 was greatly impressed. Then I saw 
your paragraph which says: "Fully compat- 
ible with all the hardware you own now. Just 
unplug your disk drive, tape recorder, 
printer and so on, replace your present 'Box' 
with a CoCo 3, and plug everything in again. 
It all works." 

I was so amazed that I called my local 
Radio Shack expecting to turn in my "Box." 
But they said they do not take "trade-ins." 
So could you please tell me what to do. 

Bernard Robichaud 
Moose Jaw. Saskatchewan 

We did not mean to imply that you 
can trade in your present computer. 
We simply meant that the CoCo 3 is 
nearly 100% compatible with your old 
hardware. 



HINTS AND TIPS 



Editor: 

For those of you who are bothered by the 
fact that the CoCo 3 can only do 192 vertical 
lines, here is a fix: 

10 P0KE&HE7BR,199:P0KE&HE7BE, 

198' IF Y>199 THEN Y=19B 

15 P0KE&HF521, 199:PDKE&HF526, 

198'HDRRW IF V>199 THEN V=198 

20 POKE&HEB75,198'FIX FDR PAINT 

30 F0RR=&HE06C TO &HEOGF: POKER, 

PEEK (fl) OR 32'CHRNGE TO X-VflLUE 

BY 200 

10 P0KES.HEF0F.24-FIX HPRINT 

COMMAND TO WORK WITH 25 ROWS 

Don't run this before any program that 

uses a lot of HPRINTs; it is likely to cause 

spillover. , , _ _ , , 

y Alan T. Dekok 

Kanata, Ontario 
Speech/Sound Help 

Editor: 

I recently purchased the Color Computer 
Speech/Sound Cartridge. I've discovered a 
programming error used in the example 
programs from the manual. It occurs on 
lines used to check the status bits at address 
&HFF7E. On Page 6, the variable Y is set 
to equal &HFF7E. 

140 IF PEEK(Y) RND 128=0 THEN 140 
The basic interpreter always sees this as 
a true statement. No ANDing is performed 
between location Y and the value of 128. To 
force ANDing to take place, parentheses are 
needed. 

140 IF (PEEK(Y) RND 128 )=0 THEN 140 
To check Bit 6 to see if the S/SC is 
currently speaking use: 

100 IF (PEEK(Y) RND G4)=0 GOTO 100 
To check Bit 5 to see if the S/SC is 
currently executing a sound effect use: 
100 IF (PEEK(Y) AND 32)=0 GOTO 100 

Jack Shaffer 
Champaign, IL 



The Perfect Excuse 

Editor: 

Thank you, Mr. Scerbo, for consistently 
good programs. Many have been useful in 
my second grade classroom. Thank you for 
sharing your talents. 

The combination of his February pro- 
gram and Radio Shack's sale on the Speech 
and Sound Cartridge finally provided an 
excuse to purchase the cartridge. The pro- 
gram works very well, but it sometimes did 
not speak when I started up my machine. 
Adding a line at the beginning of the pro- 
gram to reset the cartridge solved it for me. 
The line is: 

POKE &HFF7D,1:P0KE &HFF7D.0 

Paul French 
Burlington, IA 

Getting Organized 

Editor: 

After I am done reading the latest issue 
of rainbow, I make a copy of any OS-9 
articles in the magazine and keep them in a 
three-ringed binder for future reference. 
This way, if I need some additional informa- 
tion on an OS-9 subject, I only have to 
thumb through the notebook instead of 
going through all of my back issues of 

RAINBOW. 

Paul Wicker 
Willinghoro. NJ 

In Living Color 

Editor: 

People who are unhappy about having no 
color for CoCo 2 programs running on their 
CoCo 3 with a CM-8 monitor can now add 
color very easily. Before loading any pro- 
gram, type PRLETTEX,Y. The Y can be any 
of the 63 colors available. When X=10, the 
PM0DE4 colors that usually show up black 
will now be whatever color Y was set to be. 
When X=ll. the PP10DE4 colors that usually 
show up white will now be whatever color 
Y was set to be. 

Also, in the 320-column mode of the 
CoCo 3, the foreground and background 
colors can be changed. Type PflLETTEX.Y. 
Again, Y can be any of the 63 colors avail- 
able. When X=12, the foreground (letters 
and numbers) will be whatever color Y was 
set to be. When X=13, the background will 
be whatever color Y was set to be. However, 
pressing the reset button will change all 
colors back to the usual start-up colors. 

Marc Lederman 
Carmel. NY 



REQUEST HOTLINE 

Editor: 

I am interested in assembly language 
programming for floppy disk communica- 
tion. I have had some success in writing M L 
programs for ACIAs, PIAs and interrupt- 
driven routines. However, talking to a disk 
with an ML program appears to require 
some "tricks" in reading the data correctly. 

Barrv Barnes 

P.O.' Box 317 

Oswego, IL 60543 



A Buffer Idea 

Editor: 

I am interested in a utility program that 
would allow routine programming and disk 
I/O while CSRVE or CLORD is working. My 
idea is that something similar to a PCOPY 
could be done (with ML) to a buffer area 
similar to a print spool, and the spool area 
then activated. Is this possible with CoCo's 
interrupts working as they do? 

Kerry B. Rogers 

USS Orion (AS- 1 8) 

EPO New York, NY 

Sardinia, Italy 49513-2570 

High-Voltage Requests 

Editor: 

I need electrical engineering programs for 

my Color Computer — low and high pass, 

active and LC filters, coil design, delay lines, 

amplifiers simulation, transformers design 

(E and pot cores) and so on. , , „ , , 

Andrew Solly k 

8 Town Garden Dr. Apt. 4 

Liverpool. NY 13088 

Needs to Read 

Editor: 

We have a 9-year-old son who has diffi- 
culties in reading and reading comprehen- 
sion. We have been trying to find quality 
programs for the CoCo 2 in this area. We 
have only been able to find quality reading 
programs from Dorsett Educational Sys- 
tems. The problem we have with their 
programs is that after doing the programs 
once, our son has all the correct answers 
memorized. Any help would be appreciated. 

Linda A. Arver 

2175-36 N. Main Street Exit 

Butler. PA 16001 



INFORMATION PLEASE 

Editor: 

I was wondering if there are any games for 
the CoCo that are similar to King's Quest 
for the Tandy 1000/1200. Thank you. 

Mark Bourdeaux 

3130 Earl Drive 

Spring Arbor, MI 49283 



Looking for a Bargain 

Editor: 

I am running a cassette-based CoCo 2 and 
want to upgrade to disk. I would like to 
know if anyone knows where I might be able 
to purchase a used Drive 0. 

Shane Farris 

Route 2 Box 178 

Kings Mm., NC 28086 

Wants to Join In 

Editor: 

Does anybody know if there is a BBS in 

the Columbus, Central Ohio area? If so, 

write to me. 

David Carver 

3725 Rome Corners Road 

Galena. OH 43021 
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500 

POKES, 

PEEKS. 

'N 

EXECs 

FOR THE TRS-80 COCO 




NEVER BEFORE has this infor- 
mation of vital significance to a 
programmer been so readily 
available to everyone. This book 
will help you GET UNDERNEATH 
THE COVER' of the Color Com- 
puter and develop your own HI- 
QUALITY Basic and ML pro- 
grams. SO WHY WAIT?? 
This 80-page book includes 
POKES, PEEKs and EXECs to: 

* Autostart your basic programs 

* Disable Color Baslc/ECB/Dlsk 
Basic commands like LIST. 
LLI5T, POKE, EXEC. CSAVE(M), 
DEL, EDIT. TROM, TROFF. 
FCLEAR, DLOAD, RENUM, PRIMT 
USINQ. DIR, KILL, SAVE, LOAD, 
MERQE, RENAME. DSKIMI, 
BACKUP, DSKIS, and DSKOS. 

* Disable BREAK KEY, CLEAR KEY 
and RESET BUTTOM. 

* Generate a Repeat-key. 

* Transfer ROMPAKS to tape (For 
64K only). 

* Speed Up your programs. 

* Reset. MOTOR OM/OFF from 
keyboard. 

* Recover Basic programs lost by 
MEW. 

* Set 23 different 
ORAPMIC/SEMIQRAPHIC modes 

* Merge two Basic programs, 

* AND MUCH MUCH MOREfll 

COMMANDS COMPATIBLE WITH 
16K/32K/64K/COLOR BASIC/ ECB/ DISK 
BASIC SYSTEMS and CoCo 1,2. S3. 



ONLY $16.95 
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$9.95 

L U U additional Pokes, Peeks ' n Execs to 
give you MORE PROGRAMMING POWER. 
Includes commands for 

• Rompak Transfer to disk 

• PAINT with 65000 styles! 

• Use of 40 track single/double sided drives with variable 
step- rates 

• High-Speed Cassette Operation 

• Telewriter 64'. Edlasm-t- ■ and CoCo Mar' 
Enhancements 

• Graphics Dump ((or DMP printers) & Text Screen Dump 

• AND MUCH MUCH MORE! 

• 500 POKES. PEEKS N EXECS is a prerequisite 



DISK TUTORIAL 

(2-Disk Package) wh kMt 




An indispensable tutorial for serious disk 
Basic/ ML programmers Gives almost 
everything you must know about the disk 
system Some features: 

• Learn about track/sectors/granules 

• How the Directory is organized 

• Useful disk utilities 

• Useful ROM routines 

• How to use double sided/40/80 track drives 

• Information security on disk 

• Insight into common disk errors 

• Many Tips/ Hints/ Secrets you won't find 
elsewhere! 

• And Much Much More! 

CoCo 1,2 8.3 ONLY $36.95 



RUN COCO MAX II 

On CoCo ill 

The kit contains software & replacement 
PAL chip for 26-3024 Multipack interface 

only $29.95 



iUf 




The CoCo Graphics Designer allows you 
to create beautifully designed Greeting 
Cards, Signs and Banners for holidays, 
birthdays, parties, anniversaries and other 
occasions Comes with a library of pre- 
drawn pictures Also includes utilities 
which allow you to create your own 
character sets, borders and graphic 
pictures. Requires a TRS-80 COLOR 
COMPUTER I, II OR III OR TDP-100 with 
a MINIMUM 0F32K, ONE DISK DRIVE 
and a PRINTER, compatible with DISK 
BASIC 1.0/1.1, ADOS 1.0/1.1 ANDJD0S. 
Supports the following printers: EPSON 
RX/FX, GEMINI 10X/SG-10, NX-10, 
C-ltoh 8510, DMP-1 00/1 05/400/430, 
SEIK0SHA GP-100/250, LEGEND 808 
and GORILLA BANANA 

DISK ONLY $29.95 
PICTURE DISK #1 

This disk includes OVER 100 pre-drawn 
pictures for use with the CoCo Graphics 
Designer. 

DISK ONLY $14.95 



512K UPGRADE 

Fo CoCo III. Easy Installation. 

ONLY $99.95 
Upgrade W/0 Chips- S44.95 

512K RAMDISK 

Have two super-fast in-memory disk drives 

Requires 512K CoCo III. 

ONLY $24.95 




MICROCOM SOFTWARE 

P.O. Box 21 4 
Fairport, N.Y. 14450 
Phone (716) 223-1477 



COCO DISK ZAPPER 




Are you frustrated with crashed disks? If 
so, this program can save hours of labor by 
restoring complete or part of the information 
from the disk It's indespensable! 
Requires minimum 32 K/64K disk system 
CoCo 1,243 ONLY $24.95 



VISA MC, Am Ex, Check M0. Please add S3.00 shipping and handling (USA & 
CANADA other countries S5.00). COD add S2.50 extra NYS residents please add 
Sales Tax Immediate shipmenL Dealer inquiries invited 




Call Toll Free (For Orders) 1 -800-654-5244 9 am- 9 pm est 7 days a week 

Except NY. For information, technical informatiog NY orders & after-hours 1 -71 6-223-1 477 



The Little Train That CoCould 

Editor: 

I finally found a source for everything I've 
ever wanted to know about CoCos — 

RAINBOW. 

I was in a software slump until 1 pur- 
chased a copy of your fine magazine at a 
local bookstore. 

Does anyone have or know of a simula- 
tion program for railroad dispatching or 
train running? Can someone supply the 
codes to get the Where is it? program on 
Page 93 of the December 1986 issue of 
rainbow up and running with a DMP-105 

P rinter? KurtStecco 

2309 S. Prairie A venue 

Pueblo, CO 81005 



BULLETIN BOARD SYSTEMS 

• The newly formed Southeast Connecticut 
Color Computer Users Group meets the 
third Monday of every month. For further 
information contact me at (203)448-1388 or 
the Coconut Manor BBS at (203) 449-1792 
(24 hours). Leave a message for saii.orbill. 

Bill Gross 
Groton, CT 

• I am proud to announce the opening of 
the Cocoa CocoNut BBS. It is run on a 64K 
Tandy CoCo 2, two drives, a DCM5 
modem, and RS-BBS. The board is online 
from 9 p.m. to 5 a.m. EST, (305) 632-8956. 
All callers are instantly validated. The 
master logon password is rainbow. If you 
call out of hours, please call voice. 

Michael Whipple 
Cocoa. FL 

• I would like to inform your readers of a 
new CoCo BBS. It is called The Time 
Machine. Protocol is 8 word length, no 
paritv and I stop bit. The phone number is 
(8I3)'83I-81 1 1 and is up 24 hours a day. The 
board is run on 64K CoCo 2, Multi-Pak, and 
double-disk system. The software is original, 
based on the Remote 232 driver that ap- 
peared in the November 1986 issue. 

Bernie Middendorf 
Tampa. FL 

• The CoCoNuts of Illinois BBS can be 
accessed 24 hours a day at (618) 465-0808. 
There is about 5 meg of files and downloads. 
300 or 1200 baud is available, and it uses 
Xmodem. It is run on a modified Colorama 
board. Hackers' Haven BBS is also online 
24 hours, 300 or 1200 baud at (618) 25 1-4243 
and is running on a KKBBS setup. 

A I Muick 
Wood River, IL 

• I would like to announce the opening of 

a new BBS in Mansfield. It is run on, and 

fully dedicated to, the CoCo. It is currently 

running on a 64K with three disks and 

Richard Duncan's CoBBS Version 1.2. It is 

up 24 hours a day. Call (617) 339-1996, and 

goes by the name CoCoBBs. „ , 

Roy Jerman 

Mansfield, MA 

• The Siouxland Color Computer is chang- 
ing. It will be for members only and there 
is a sign-up fee to get on the board. If you 




Editor: 

I am always interested to see how others have their CoCos set up and maybe others 
would also like to see this. 

Here is a picture of mine to start out. I have a 64K CoCo I, two Radio Shack disk 



drives, cassette and an Epson FX-80 printer. 



Norman G. Thode, Austin, TX 



would like to join, send me your full name 
and address along with a phone number 
where we can call and verify the informa- 
tion. There is a $5 per year fee. The new 
board is run under the CoBBS System and 
should have a lot more to offer than before. 

Call (402) 494-2284. .. _ , 

Alan Pedersen 

South Sioux City. NE 

• 1 am pleased to announce the very first 
BBS for Canandaigua, NY. CoBBS »4IA, 
sister to CoBBS #41 of Corning, AR. 
CoBBS #4 1 A features Xmodem uploads 
and downloads, hobby section and more. 
Seven days a week from 8 a.m. to 8 p.m. 
EST, (501) 857-3138. Please use real names. 

7 " E "'- Sam Fagg 

Canandaigua, NY 

• There's a new BBS that supports the 
CoCo 1, 2 and 3 in Altus, OK. Shamrock 
BBS is running on a 640K 32 meg, hard- 
drive PC Clone. It fully supports all CoCos 
with uploads, downloads and a full message 
base specifically for CoCo users. Call (405) 
482-7080 24 hours, 300/ 1200 baud. 

Craig Riley 
Alius, OK 

• I have recently started a BBS using ihe 
Colorama package. The BBS number is 
(717) 273-8444, 24 hours a day. There are 
downloads for CoCo 2 and 3. Use 8 bits, no 
parity. 300 baud only. There is another BBS 
in the reading area using a Colorama system: 
Glass Menagerie at (215) 376-1819. This 
BBS is also 24 hours a day, 300 baud. 
SysOps: Balloon Meister and Glass Man. 

Ricky V. Elyar 
Lebanon, PA 



• The CoCo Beach BBS is going strong in 
Virginia Beach, VA. (804) 474-1211, 300/ 
1200 baud, 7-E-l or 8-N-l. Over 200 pro- 
grams for downloading. ,. ,, _ , 

° Jim McCracken 

Virginia Beach, VA 

• There is a new BBS in northern Ontario. 
This BBS is free to all. It features E-mail, 
gossip, gallery, up/downloading, want ads, 
hints, tips and much more. Call (705) 848- 
1221. Hours are Monday through Friday, 7 
p.m. to 7 a.m., Friday at 7 p.m. till Sunday 
9 p.m. Soon to be run 24 hours. 

Mike Dickerson 
Elliot Lake, Ontario 

• I'd like to mention CoCo BBSs in Surrey, 
British Columbia. Call of the Wild, (604) 
597-1964, 24 hours, Gerrv Bell. Bit by Byte 
BBS, (604) 581-6310, 24 hours, Mark Lob- 
law. Delta 80 BBS, (604) 585-0680. 24 hours, 
Charles Lindberg. ^ &// 

Surrey, British Columbia 

THE RAINBOW welcomes letters to the 
editor. Mail should be addressed to: Letters 
to Rainbow, The Falsoft Building, P.O. Box 
385, Prospect, KY 40059. Letters should 
include the writer's full name and address. 
Letters may be edited for purposes of clarity 
or to conserve space. 

Letters to the editor may also be sent to 
us through our Delphi CoCo SIG. From the 
CoCo SIG> prompt, type RRI to take you 
into the Rainbow Magazine Services area of 
the SIG. At the RAINBOW> prompt, type 
LET to reach the LETTERS> prompt and 
then select Letters for Publication. Be sure 
to include your complete name and address. 
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UTILITIES/BOOKS 



UTILITY ROUTINES for the 
TANDY &TRS-80 COCO (Vol 1) 

• COMMAND KEYS • CURSOR STYLES • ERROR SKIP 

• FULL LENGTH ERRORS* KEY CLICKER 

• REPEAT KEY* REVERSE VIDEO (Green & Red) 
SPOOLER • SUPER SCROLLER • TAPE-TO-DISK 

• AND MUCH MUCH MORE III 

For 16K/32K/64K Cassette or Disk Systems 

C0C01.2&3 book $19.95 

ROUTINES ON CAS/DISIC$24.95 
BOTH BOOK AND CAS or DISK: $36.95 

UTILITY ROUTINES (Volume II) 

Includes 20 ott-used utilities such as: 

• PAINT with 65000 styles 

• Add SUPERSCRIPTS Id your DMP printer 

• Design your own commands 1 • Programming Clock 

• Fast Sort for Basic Strings • CoCo Calculator 

• Create a character set lor your DMP printer 

• Find/ Replace phrases in your Basic Program 

• Let the computer locate your errors! 

• Super EDITing Basic Programs 

• Automatic Directory Backup • And much much morel 

64K DISK ONLY $29.95 



J MIC II) 



UTILITY BONANZA I 

Includes 20 best-selected utilities: 

• 40K Disk Basic • Disk Cataloger 

• Super Tape-to-Disk Copy (with Automatic Relocate) 

• LList Enhancer • X- lie! lor Basic Programs 

• Graphics Typesetter (two text sizes!) 

• LARGE DMP Graphics Dump • Basic Stepper 

• Hidden 32 K (Use the "hidden" 32 K Irom your 64 K CoCol 

• RAM Disk | lor Cassette& Disk Users) 

• Single Key Printer Text Screen Dump 

• And much much more!!! 

Most programs compatible with CoCo 3 

DISK(64KReq.) ONLY $29.95 

"MUST" BOOKS 

UNRAVELLED SERIES: These books provide a 
complete annotated listing of the 
BASIC/EDB and DISK ROMs. 

EXTENDED COLOR BASIC UNRAVELLED: S39.95 

DISK BASIC UNRAVELLED: SI9.95 

BOTH UNRAVELLEG BOOKS: $49.95 

SUPER ECB|CoCo3) UNRAVELLED: SZ4.95 

ALL 3 UNRAVELLED BOOKS: S59.95 

RAINBOW GUIDE TO OS-9 |Book): SI8.95 

RAINBOW GUIDE TO OS-9 (2 Disks): 529.00 

BASIC PROGRAMMING TRICKS: Tips and Iricks tor Basic 

Programmers Only SI 4.95 

CoCo 3 SECRETS REVEALED: $19.95 

ASSEMBLY LANGUAGE PROGRAMMING*: S18.00 



% 



ALL SOFTWARE COMPATIBLE WITH COCO 1, 2 & 3 

(Except those marked with *) 







SUPER TAPE/DISK 
TRANSFER 



• Disk-to- Disk Copy (1 -3 passes) 

• Tape-to-Disk Copy 

• Tape-to-Disk Automatic Relocate 

• Disk-to- Tape Copy 

• Tape-to-Tape Copy 

Copies Basic/ M L programs and DATA files. 

CoCo 1, 2 & 3 32 K Disk System 

(Disk to Disk Copy requires 64 K) 

DISK ONLY 

$24.95 



CABLES/HARDWARE 

AYATEX MODEM: Hayes compatible 

300/1200 Baud, Auto- Dial/ Answer/ RediaL 

ONLYS129.95 

MODEM CABLE: S19.95 

DS-69B DIGISECTOR: Microworks Digitizer 

for CoCo 1, 2 & 3. Includes software 

ONLY $149.95 

VIDEO CLEAR: Reduce TV interference. 

ONLYS19.95 

15' PRINTER/MODEM EXTENDER CABLE: 

ONLYS16.95 

UNIVERSAL VIDEO DRIVER: Use your 

monochrome or color monitor with your 

CoCo (ALL CoCos). Includes audio 

connectioa Easy installation- no 

soldering. ONLY $29.95 

INTRONICS EPROM PROGRAMMER: Best 
EPROM Programmer for the CoCo. 
Lowest Price Anywhere- SI 37.95. 

RS232 Y CABLE: Hook 2 devices to the 
serial port ONLY SI 8.95. 

3-P0SITI0N SWITCHER: 

Select any one of three RS232 devices 

(printers/ modems) from the serial port 

ONLYS37.95 

Y CABLE: Use your Disk System with CoCo 

Max. DS69, etc ONLYS24.95 

SERIAL TO PARALLEL INTERFACE: With 6 
switch selectable baud rates (300-9600). 
Comes with all cables $44.95 



OTHER SOFTWARE... 

Telewriter-64 (Cas) $47.95 (Dsk) 57.95 

Teleform: Mail Merge for TW-64® 1 9.95 

Telepatch III 29.95 

Graf Plot 44.95 

CoCo Max (Cas)* 67.95 

CoCo Max II (Dsk)* 77.95 

FKEYS III 24.95 

Autoterm Terminal Prog (Cas) 29.95 

(Latest Version) (Dsk) 39.95 

Font Bonanza 29.95 

SPIT'N IMAGE: Makes a mirror image 
( BAC KU P) of AN Y disk, even protected ones. 
Will also initialize and BACKUP in one pass 
0NLYS32.95 

COCO UTIL II (Latest Version): Transfer CoCo 
Disk files to IBM compatible computer. 
Transfer MS-DOS files to CoCo. 
CoCo1,2&3 ONLY $36.95 

EARS: Speech recognition system 
0NLYS99.95 

SUPER VOICE: Speech synthesizer. 
ONLY $79.95 

LYRA: Best music composition program 
ONLY $54.95 

SYMPHONY 12: A real hardware music 
synthesizer. ONLYS69.95 
ADOS: Advanced disk operating system 
ONLY $27.95, CoCo 3: $34.95 
DISK ANTI- PIRATE: Best copy- protection 
program for disk Basic and ML programs. 
CoCo1,2&3 ONLYS59.95 
COLOR SCRIBE III: The Coco 3 Word- 
Processor 
ONLY $49.95 

GAMES (DISK ONLY) 
GANTELET: $28.95 
MISSION FIB ASSAULT: $28.95 
MARBLE MAZE: S28.95 
PAPER ROUTE: $28.95 
KNOCK OUT: S28.95 
KARATE: $28.95 
WRESTLE MANIAC: $28.95 
BOUNCING BOULDERS: $28.95 
THE GATES OF DELIRIUM: SZ8.95 
P-51 MUSTANG SIMULATION: S34.95 
WORLDS OF FLIGHT: $34 95 



MJF 



MICROCOM SOFTWARE 

P.O. Box214 
Fairport, N.Y. 14450 
Phone(716) 223-1477 



To order All orders S50 & above shipped by 2nd day Air UPS with no extra charrja Last minute shoppers 
can benefit VISA, MC, Am Ex. Check, MO. Please add S3.00 shipping and handling 
(USA& CANADA, other countries $5.00) COD add $2.50 extra NYS residents please add 
Sales Tax Immediate shipment Dealer inquiries invited. 



Call Toll Free (For Orders) 1 -800-654-5244 9 am- 9 pm est 7 days a week 

Except NY. For information, technical information NY orders & after-hours 1 -71 6-223-1 477 



PRINT#-2, 



Of Contests 
and Books 
and Births 



Our fourth Adventure contest is being announced in this 
month's magazine, so it's time to "get cracking" in order to 
meet the August 15 entry deadline! I happen to believe that 
Adventures not only are a lot of fun to play (they're addictive and 
account for untold hours of lost sleep as Adventurers press on into 
the wee hours), but they're also an excellent introduction to the art 
and craft of programming: Many folks get their first real look at the 
construction of a program by "sneaking a peek" at a BASIC listing 
for a hint to "get past the dragon's cave." 

A nice thing about writing Adventures is that you do not have 
to be a computer expert; imagination and an Adventurous spirit are 
the keys. Some of the most entertaining and challenging Adventures 
have a very simple program structure, but they excite us with the 
twists and turns and unexpected aspects of the plot itself. Therefore, 
even if you're a beginning BASIC programmer, you can and should 
enter our Rainbow Adventure Contest, and I hope that you will. The 
rules and all are on Page 159 of this issue. 

One way to get started is to obtain a copy of our brand new, just 
off the presses collection of contest-winning Adventures: The Third 
Rainbow Book of Adventures (see Page 65 for details). A virtual 
textbook on Adventuring, it contains 19 top-notch examples of what 
it takes to create an entertaining — and prize-winning — Adventure. 
And, when our fourth Adventure contest results are announced, you 
could well be among those who share the prizes our advertisers are 
donating and perhaps see your entry published, either right in 
RAINBOW itself, or in our fourth Adventure book. I'm very pleased 
with our newest addition to The Rainbow Bookshelf and want to 
publicly thank not only our contestants/ authors, but also Jutta 
Kapfhammer and Philip Helm, who conscientiously judged the 



12 THE RAINBOW May 1987 



Model 101 
Interface $39.95 



Model 104 Deluxe 
Interface $51.95 



Model 102 
Switcher $35.95 



Model 105 
Switcher $14.95 




• Serial lo parallel interlace 

• Works with any COCO 

• Compatible with "Centron- 
ics" parallel input printers 

• 6 switch selectable baud 
rates 300-600-1200-2400- 
4800-9600 

• Small size 4" x 2" x 1" 

• Comes complete with 
cables to connect to your 
computer and printer 



Other Quality 
Items 

High quality 5 screw shell C- 
10 cassette tapes. S7.50 
dozen 

Hard plastic storage boxes tor 
cassette tapes. S2.50'dozen 

Pin-Feed Cassette Labels 
White S3.00/1 00 
Colors $3.60/100 (specify 
red. blue, yellow, tan) 



Same features as 101 plus 

• Built in serial port tor your 
modem or other serial device 

• Switch between parallel 
output and serial output 

• Size is 4.5" x 2.5" x 1 .25" 

• Comes complele with 
cables to connect to your 
computer and printer 

NEW! Cables for 
your COCO 

• U.L listed toil-shielded cable 

• 2 Types: male/female exten- 
sion cables (used between 
a serial device and existing 
cable) male male cables 
(used between two serial 
devices such as a modem 
and one ot our switchers). 

• 3lt./$3.95. 6ft./$4.49, 
10ft.'$5.59 Specify MM 
or M F and length. 



• Connect lo your COCO 
serial port and have 3 switch 
selectable serial pons 

• Color coded indicator lights 
show switch position 

• Lights also serve as a 
power on indicator for your 
COCO 

• Heavy guage blue anodized 
aluminum cabinet with non- 
slip rubber feet 

The 101 and 104 require 
power lo operate. Most print- 
ers can supply power to your 
interlace (Star, Radio Shack 
and Okidata are |ust a few that 
do - Epson and Seikosha do 
not). The interfaces can also 
be powered by an AC adap- 
tor; Radio Shack model 273- 
1431 plugs into all models. If 
you require a power supply, 
add a "P" to the model number 
and add S5.00 to the price. 
(Model 1 01 P $44.95, Model 
104PS56.95). 



i Connects to your COCO 
to give you 2 switch select- 
able serial ports 

> 3 fool cable to connect to 
your COCO'S serial port 

> The perlect item to use to 
connect a printer and a 
modem to your COCO 

> Small in size, only 4.5 x 2.5 
x 1.25 



The Model 101 , 102, 104 and 
1 05 work with any COCO, any 
level basic and any memory 
size. These products are co- 
vered by a 1 year warranty. 

The Model 1 1 and 1 04 work 
with any standard parallel 
input printer including Gemini, 
Epson. Radio Shack, 
Okidala, C. loth. Seikosha, 
Panasonic and many others. 
They support BASIC print 
commands, word processors 
and graphic commands. 

We manufacture these 
products - dealer inquiries 
are invited. 



Cassette Label 
Program $6.95 

• New Version - tape trans- 
ferable to disk - save and 
load labels from tape to disk 

• Prints 5 lines of information 
on pin-feed cassette labels 

• Menu driven, easy to use 

• Standard, expanded and 
condensed characters 

• Each line of text auto- 
matically centered. 

• Label display on CRT, en- 
abling editing before printing 

• Program comes on lape 
and is supplied with 24 
labels to get you started 

• 16K ECB required 

Ordering 
Information 

Free shipping in the United 
States (except Alaska and 
Hawaii) on all orders over 
S50.00. Please add S2.50 for 
shipping and handling on or- 
ders under S50.00. 
Ohio residents add 5.5% 
sales tax. 

Call (513) 677-0796 and use 
your VISA or MASTERCARD 
or request C.O.D. (Please 
add S200 for CO. D. orders). 
If you prefer, send check or 
money order; payable in U.S. 
Funds to: 

Metric Industries 
P.O. Box 42396 
Cincinnati. Ohio 
45242 








"The Rainbow 
Bookshelf is 
expanding and 

more are on 
the way" 



contest and expertly edited the book — 
a massive undertaking that has pro- 
duced a valuable new resource for 
learning the basics, as well as a source 
for just plain fun. 

They say creating a book is "like 
having a baby." To advise us on the 
validity of that assertion, we have to 
look no further than our own Denise 
Webb, who did the graphic design: She 
no more than finished her work on the 
book before giving birth to 8-pound, 3- 
ounce Dustin Michael Webb. Of course, 
there's a big difference: One project is 
over and done, while the other is a 
lifelong commitment! 

Actually, we have two books being 
"birthed" this month. Our long-awaited 
and scholarly work. The Rainbow 
Introductory Guide to Statistics, is also 
ready, just in time for RAlNBOWfest 
Chicago. In fact, RAINBOW Contribut- 
ing Editor Michael Plog will be on hand 
at our fifth Chicago show to autograph 



copies. And, of course, Jutta will be at 
RAlNBOWfest and might be per- 
suaded, along with several of the win- 
ning authors who are attending, to sign 
the Adventure book. In fact, CoCo Cat 
will be autographing (or, should I say 
paw-printing) pictures, too. 

This time, both Dale Puckett and his 
writing partner Peter Dibble are making 
the trip, so, even if you have a copy of 
The Complete Rainbow Guide to OS- 
9 signed by Dale, you might want to 
bring it along for Peter to autograph, 
too. No, they won't have their latest 
book ready for the Chicago show, but 
we do expect to have printed copies of 
their comprehensive guide to the CoCo 
3 and OS-9 Level II by mid-July! In the 
printing business, that's just around the 
corner. 

Books and more books. Yes, The 
Rainbow Bookshelf is expanding and 
more are on the way; but, then, this is 
our printer issue, isn't it? 

— Lonnie Falk 



SPECIAL DEAL ON 
500 PROGRAMS! 



GET 50 DISKS OR 50 CASSETTE TAPES FULL OF OVER 
500 PROGRAMS. HERE IS WHAT YOU'LL RECEIVE: 

*Over 250 Utility/Home Application Programs including a 
Word Processor, DataBase, Spreadsheet, Account Man- 
ager, 2 Basic Compilers, Terminal Programs, ROM Copies, 
Mail List, Machine Language Tutorials, Plus Much More! 

*Over 200 exciting games including Warlords, Star Trek, 
Super Vaders, Solar Conquest, Horse Races, Football, 
Baseball, Frog Jump, Invader, Plus Much More! (Many 
machine language games) 

* Over 30 adventures including The College Adventure, Dun- 
geon Master, Space Lab, Ice World, Ship Wreck, Zigma 
Experiment. Plus 32K Graphic Adventures. 

EACH INDIVIDUAL ISSUE SOLD FOR s 9.°° 
EACH OR s 450 FOR ALL 50 ISSUES. WE 
SLASHED THE PRICE TO ONLY 150. 00 . 



REG. $ 450 







••THIS MONTH ONLY** 

Buy this package of 500 programs and 

receive a free 6 month subscription. 

(A s 35 value) 



$-|50oo 



RAINBOW 

CtHTtfKMTlON 
MJU. 



THE GREATESTSOFTWARE DEAL 
ON EARTH JUST GOT BETTER! 



THAT'S RIGHT! THIS MONTH WE'VE DROPPED OUR YEARLY 
SUBSCRIPTION RATE AN UNBELIEVABLE s 1 0.°° TO ENTICE YOU 
INTO SUBSCRIBING WITH US. GET 1 2 DISKS OR TAPES A YEAR 
CONTAINING OVER 120 QUALITY PROGRAMS. A SUBSCRIP- 
TION TO T & D SOFTWARE CONSISTS OF 10 READY-TO-LOAD 
PROGRAMS DELIVERED BY FIRSTCLASS MAIL EVERY MONTH. 

NO WE ARE NOT THE SAME AS THE RAINBOW ON TAPE. IN 
FACT, MANY SUBSCRIBERS HAVE WRITTEN IN AND SAID THAT 
WE ARE MUCH BETTER THAN RAINBOW ON TAPE! 




PRICES 

TAPE THIS 

OR DISK MONTH ONLY 
I YEAR (12 Issues) JfrOO 60.00 

6 MO. (6 Issues) AM? 35.00 

1 1SSUE M*T 8.00 

- Michigan Residents Add 4% 

Overseas Add $10 to Subscription Price 
Personal Checks Welcome! 



• 16K-64K Color Compuler 



OUR LATEST ISSUE CONTAINED 



» Over 4000 Salisfied Cuslomers I, Accounts Receivable 6. FoolRace 



• Back Issues Available From 
» July '82 (Over 500 Programs) 



RAINBOW 

CEIHlFtCATlOH 
KM 



2. Work Male 

3. Calendar 

4. Invasion 

5. TripAdvenlure 



7. Flippy the Seal 

8. Screen Calculator 

9. Able Builders 

10. Super Error 2 r~^ 



Available on COC0 1, 2 and 3! 
Ail Progiams Include Documentation 1 



MasterCard 



T & D SUBSCRIPTION SOFTWARE, 2490 MILES STANDISH DR., HOLLAND, Ml 49424 (61 6) 399-9648 
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DISKMASTER . . . THE ultimate disk drive 

SYSTEMS FOR THE OS-9 BASED COCO 3 BAR NONE ! ! 





COCO 3 + OS-9 + DISKMASTER 
THE HIGHEST PERFORMANCE 
PERSONAL COMPUTER 
AVAILABLE TODAY! 



THE DISKMASTER SYSTEM . . . A Completely Integrated System with HARDWARE AND 
SOFTWARE COMPATIBILITY GUARANTEED from a Single Source. In addition to Single Source Confidence and Convenience, 
you will get a Disk System that has NO EQUAL in the COCO World! The Floppy Drives are the High Density (IBM-AT) Types with 
over 1 MB of Storage and TWICE THE DATA TRANSFER RATE of Single or Double Density Drives. Using these High Speed 
Drives is almost like using a Hard Disk PLUS ... A FIRST FOR COCO COMPUTERS! DMA transfer of Data from the 
Floppy Disk to a SEPARATE HARDWARE DISK CACHE frees up the CPU during Disk Accesses. The Keyboard, Printer etc. 
KEEP ON WORKING DURING DISK ACCESSES! 

The Hard Disk Drives are 3 1/2" Drives with the SCSI INTERFACE. These are the Next Generation of Hard Drives where the 
Industry has Concentrated the Latest Inovations in Hard Drive Technology. The SCSI INTERFACE is THE High Performance 
Industry Standard for these type of Drives. No Non-Standard Interfaces used here! The Software is by D. P. JOHNSON. His 
SDISK Software set the Standard for 40 & 80 track Disk Drive Software for the COCO 2. This Unique Software allows 
DISKMASTER Systems to read 35, 40, or 80 Track, Single or Double Sided, Single, Double or High Density Drives in Radio 
Shack, Standard OS-9. Fujitsu or Mizar Formats! 



For Maximum Performance: add the plus 100 

The PREMIER 512K Memory Expansion for the COCO 3. 




"Save S20.00 off the regular price of S109.00 when purchased 
with a DISKMASTER System. 



PLUS!!! 

Each DISKMASTER System 
includes the following additional 
features . . . 

• 3 Software Selectable Hardware Serial Ports with 
XMODE and special SETBAUD Commands 

• Centronics Compatible Bi-Directional Parallel Port 

• Super Accurate Hardware Clock (+/- 6 seconds/month) 
with Battery Backup 

• Hard Disk Boot Capability 

• Expansion Connector for additional Floppy Drives 

• Optional 0.5 MB, 1 MB or 1.5 MB RAMDISK 



THINK ABOUT IT . . . The Unsightly, 

Cumbersome and Unreliable Expansion Interface is 
Eliminated. NOW compare cost. Purchasing an Expansion 
Interface and numerious cards from various suppliers 
results in a system that costs about the same as a 
DISKMASTER SYSTEM but doesn't even begin to compare 
to it in performance! 



HEMPHILL ELECTRONICS, INC. 

1922 Cogswell Road 
South El Monte, CA 91733 

(818)575-4530 

(Mon. thru Thurs., 1:30 to 5:30 PM Pacific Time) 



CC3-1 2 1 MB Floppy Drives 

CC3-20H 1MB Floppy- 20MB Hard Drive 

RAMDISK Options Call Factory 



S 795.00 
S1 ,295.00 
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BUILDING MAYS RAINBOW 



A bit of bike trouble . . . 

. . . but we keep on pumping 



D orris, my wife, sometimes says to me, "Do you have to tell people 
everything?" but since she recently blurted, "I gotta get a picture of 
this!" I guess it's OK to discuss my latest "peripheral." 

Besides, hooking a lap keyboard to the handlebars of my exercycle is a very 
logical idea that needs sharing; 1 wish I'd thought of it sooner. I mean, with 
as much time as I spend in front of a monitor, anything to improve the 
circulation is a benefit. It was at the "pillow stage" of my exercise in exercising 
that she wanted to preserve the moment with a picture. 

You see, since I was uncertain about how to attach the keyboard to the bike, 
my first response was to pile several pillows on the handlebars to form a 
platform of sorts. It took five big feathery ones to achieve the proper height 
before plopping the keyboard in place. The monitor itself, I situated atop a 
nearby chest of drawers in which I keep documentation and odds and ends. 
The whole thing was a bit precariously jury-rigged, but it worked — sort of. 

My glasses posed a problem. Since my close vision is fine, I have avoided 
getting bifocals by just removing my glasses for reading or close work, but 
pedaling away on the exercycle with my keyboard on the pile of pillows and 
the monitor some four feet away, I need my glasses to see the screen. On the 
other hand, they actually impair my close vision enough that I cannot see the 
keyboard properly with them on. Yes, I must hunt and peck as 1 huff and puff. 
Being a creative sort, I have eliminated the need for glasses by squinting and 
relying heavily on the 32-column text mode. Long term goal: Learn to touch 
type. 

A notable breakthrough came when I remembered seeing a "reading stand" 
designed especially for exercycles. Sure enough, the local Schwinn dealer had 
a nice one and, my oh my, it's the perfect height and width for the keyboard 
— looks like a custom installation. It can also hold a CoCo itself, though the 
wiring gets even junkier looking than usual. Add a Multi-Pak Interface, you're 
getting big-time bizarre. 

Actually, I may keep one of the pillows — for the bike seat — since it looks 
like I'll be in front of the screen more than ever. At the moment, THE RAINBOW'S 
CoCo SIG is adding dozens of Orchestra-90 files that we've obtained through 
our recent acquisition of Delphi's Tandy SIG. And, though our CoCo SIG is 
in high gear — the 25,000th message was posted in the Forum in early March 
by John Kendziora of Whitehouse, Ohio — Falsoft is busily creating both a 
PC Compatibles SIG and an Aviation SIG on Delphi; both will be open by 
the lime you see this. 

The Aviation SIG is tied to our newest publication, NEW PILOT, for the 
Student and Low-Time Flier. NEW pilot's premier issue carries an April cover 
date and is two-color throughout. We're proud of all 16 pages, which make 
it four times as large as the first rainbow! If you're a student, a private pilot 
or simply an aviation enthusiast, I commend NEW PILOT to your attention and 
invite you into our Aviation SIG, too. 

From pedaling to peddling, here's my usual wheeling deal: Enter an annual 
subscription and we'll steer a RAINBOW your way (look Ma, no hands) each 
month throughout a one-year cycle. 



— Jim Reed 
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Buy the PRO-COLOR- 
SERIES for S79.95 and get 12 
months of The Rainbow FREE! If 
you are an existing subscriber* 
to The Rainbow, we'll renew your 
subscription for an additional 12 
months. This is a savings to you 
of $31 .00! The PRO-COLOR- 
SERIES consists of three programs. 
PRO-COLOR-FILE *Enhanced* V2.0 Design a record struc- 
ture up to 60 fields with 1020 spaces per record, 4 custom 
designed data entry screens, math functions on single records with 
IF-THEN-ELSE capability. Extremely flexible reporting capability 
for totals, averages and summaries. Mailing label generation of up 
to 10 labels across and 30 lines per label. Use the posting function 
to perform mathematical calculations on the entire database, with 
records updated automatically. Output reports to the printer, disk or 
screen. Send information directly into a DYNACALC " compatible 
file for use in spread sheets. Design custom menus for report 
selections and streamline repetitive tasks into one keystroke with 
the command processor. Sort 750 records in less than 5 minutes 
and create special indexes of your file for reporting and accessing. 
Store as many records as your disk will hold! 
PRO-COLOR-FORMS V2.0 This mail-merge feature will 



getl2 

FREE! 



7 W 



&t*s 



allow you to write a letter and 
have names from your database 
inserted automatically. Design 
invoices, inventory cards and 
other forms. Or if you use pre- 
printed forms, you can set up a 
template to print information in 
the appropriate places. You can 
use printer codes for features like "bold" and "underline." If you 
have our TELEGRAPHICS " program, you can have hi-res pictures 
included as part of the form! You can even right justify your text for 
a more professional look. 

PRO-COLOR-DIR This utility will read the directory of all 
your diskettes and create a data file that can be accessed by 
PRO-COLOR-FILE. Store up to 1 ,000 entries on one diskette and 
generate a master report that shows where each program is in your 
library. You can keep track of the date you created a disk and the 
date you last updated it by generating labels for your disks. 
The PRO-COLOR-SERIES gives you database capabilities found on 
larger computers, but at a fraction of the cost. Our PRO-COLOR- 
SERIES lets you organize important information together in one 
place, right at your finger tips. Not only will you be getting the most 
widely used database program for the CoCo 1 , 2 and 3, but also the 
ONLY magazine that can give you all the facts about the CoCo! 



□ Yes, I would like to receive The PRO-COLOR-SERIES and 12 months of the Rainbow magazine 
(or just $79.95. 



NAME 



J ADDRESS 



PHONE 



For software: 

$ 3 shipoing/handling 

SI 2 overseas 

For subscription 
S37 overseas surface 
S72 overseas air mail 
S 7 Canada 

No refunds or returns on this offer.. 
No CODs. 



CITY 



STATE 



ZIP 



*lf renewing, please include the mailing label from your latest issue 
of The Rainbow. 

Derringer Software, Inc. 

PO Box 5300 Florence, SC 29502-5300 
(803)665-5676 



VISA 



SIGNATURE 



ACCOUNT NUMBER 



EXPIRATION DATE 
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SHOWCASE YOUR BEST! You are invited to nominate 
original work lor inclusion in upcoming showings ol 
'CoCo Gallery." Share your creations with the CoCo 
Community! Be sure to send a cover letter with your 
name, address and phone number, detailing how you 
created your picture (what programs you used, etc.) and 
how to display it. Also, please include a few (acts about 
yourself. 

Don't send us anything owned by someone else; this 
means no game screens, digitized images from TV 
programs or material that's already been submitted 
elsewhere. A digitized copy of a picture that appears in 
a book or magazine is no! an original work. 

We will award two first prizes of $25, one for the CoCo 3 
and one for the CoCo 1 and 2; one second prize of $15 and 
one third prize of $10. Honorable mentions may also be given 

Please send your entry on either tape or disk to the CoCo 
Gallery, THE RAINBOW, P.O. Box 385, Prospect, KY 40059. 1 1 
Remember, this is a contest and your entry will not be 
returned. 

— Angela Kapfhammer 
Curator 
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ENTERTAINMENT 



Charting biorhythms is easy with this 
simple program 




According to biorhythm theory, we all have cycles 
that influence our physical, emotional and intellec- 
tual states. These cycles begin at birth, and each 
cycle follows its own particular rhythm until we die. 

The physical cycle is 23 days long. The first 1 1 x /i days are 
the positive side of the cycle. This is when you will feel your 
best. The other 1 1 Vi days are the negative part of the cycle 
and you probably won't be up to par. 

The emotional cycle is 28 days long. According to the 
theory, the first 14 days you should feel cheerful, optimistic 
and cooperative. Conversely, during the down half of the 
cycle, you will feel moody and irritable. 

Your third cycle is the intellectual cycle, which is 33 days 
long. The first half of the cycle {Wh days) should be a good 
time for learning and creativity. During the second half of 
the cycle, it may be best to avoid mental challenges. 

1 designed BioChart using a CGP-II5 printer, but it 
should work on most others. I hope you enjoy this program 
and have as much fun with it as 1 have! 

(Questions about this program may be addressed to the 
author at 3630 Mary Lane, Escondido, CA 92025, 916-746- 
9402. Please enclose an SASE when writing for a 
reply.) n 

Steve Tenney is a computer operator for Advance Sighn's 
and Desiglms. He has worked with the CoCo for five years. 
His wife, Louise, is a computer widow because he's always 
computing. 
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The Amazing A-BUS\& 




An A-BUS system with two Motherboards 
A-BUS adapter In foreground 

The A-BUS system works with the original CoCo, 

theCoCo2 and the CoCo 3. 

Aboutthe A-BUS system: 

• All the A-BUS cards are verv easy lo use with any language that can 
read or write to a Port or Memory In BASIC, use INPandOUT(or PEEK and 
POKE with Apples and Tandy Color Computetsl 

• They are all compatible with each other. You can mix and match up to 25 
cards to lit your application Card addresses are easily set wilh lumpers. 

• A-BUS cards are shipped with power supplies (except PD-123) and 
detailed manuals (including schematics and programming examples). 

Relay Card RE-i4o:si29 

Includes eight industrial relays. (3 amp contacts. SPST) individually 
controlled and latched 8 LED's show status Easy to use (OUT or POKE in 
BASIC). Card address is lumper selectable 

Reed Relay Card re-156: $99 

Same features as above, but uses 8 Reed Relays to switch low level signals 
(20mA max). Use as a channel selector, solid state relay driver, etc 

Analog Input Card AD-142:$129 

Eight analog inputs. to +5V range can be expanded to 1 00V by adding a 
resistor. 8 bit resolution (20mV). Conversion time 120us. Perfect lo 
measure voltage, temperature, light levels, pressure, etc. Very easy lo use 

1 2 Bit A/D Converter an-146: S139 

This analog to digital converter is accurate to .025% Input range is -4V to 
+4V Resolution I millivolt. The on board amplifier boosls signals up to 50 
times to read microvolts. Conversion time is 1 30ms. Ideal for ihermocouple. 
strain gauge, etc 1 channel. (Expand to 8 channels using the RE-156 card) 

Digital Input Card in-i41:$59 

The eight inputs are optically isolated, so il's safe and easy to connect any 
"on/off" devices, such as switches, thermostats, alarm loops, etc. to your 
computer To read the eight inputs, simply use BASIC INP (or PEEK) 

24 Line TTL I/O dg-148:$65 

Connect 24 Input or output signals (switches or any TTL device) to your 
computer The card can be set lor: input, latched output, strobed output, 
strobed input, and/or bidirectional strobed I/O Uses the 8255A chip. 

Clock with Alarm cl-144: sa9 

Powerful clock/calendar with battery backup lor Time, Date and Alarm 
setting (time and date); built in alarm relay, led and buzzer; timing to 1 /1 00 
second Easy to use decimal lormat. Lithium battery included. 

Touch Tone® Decoder ph-i45:S79 

Each lone is converted into a number which is stored on the board Simply 
read the number with INP or POKE. Use for remote control projects, etc. 

A-BUS Prototyping Card pr-i52:$is 

3% by A'h in. with power and ground bus. Fits up to 10 I.C.s 



Plug into the future 

With the A-BUS you can plug your PC (IBM, Apple, 
TRS-80) into a future of exciting new applications in the fields 
of control, monitoring, automation, sensing, robotics, etc. 

Alpha's modular A-BUS offers a proven method to build your 
"custom" system today. Tomorrow, when you are ready to take 
another step, you will be able to add more functions. This is ideal for 
first time experimenting and teaching. 

A-BUS control can be entirely done in simple BASIC or Pascal, 
and no knowledge of electronics is required! 

An A-BUS system consists of the A-BUS adapter plugged into 
your computer and a cable to connect the Adapter to 1 or 2 A-BUS 
cards. The same cable will also fit an A-BUS Motherboard for 
expansion up to 25 cards in any combination. 

The A-BUS is backed by Alpha's continuing support (our 11th 
year, 50000 customers in over 60 countries). 

The complete set of A-BUS User's Manuals is available for S10. 
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Smart Stepper Controller sc-i49:$299 

World's finest stepper controller On board microprocessor controls 4 
motors simultaneously. Incredibly, il accepts plain English commands like 
"Move arm 10.2 inches left" Many complex sequences can be defined as 
"macros" and stored in the on board memory. For each axis, vou can control' 
coordinate (relative or absolute), ramping, speed, step type (half, full wave), 
scale factor, units, holding power, etc Many inputs: 8 limit & "wail until" 
switches, panic bulton. etc. On Ihe fly reporting of position, speed, etc. On 
board drivers (350mA) lor small steppers (M0- 1 03) Send for SC-1 49 flyer 
Remote Control Keypad Option RC-1 21 : S49 

To conlrol the 4 motors directly, and "leach" sequences ol motions. 
Power Driver Board Option PD-1 23: S89 

Boost controller drive to 5 amps per phase. For two motors (eight drivers) 
Breakout Board Option BB-122:S19 

For easy connection of 2 motors 3 It cable ends with screw terminal board. 

Stepper Motor Driver st-i43:$79 

Stepper motors are the ultimate in motion conlrol. The special package 
(below) includes everything you need to get lamiliar with them. Each card 
drives two stepper motors (1 2V, bidirectional. 4 phase. 350mA per phasel 
Special Package:2motors(M0-103) + ST-143 PA-181: $99 

Stepper Motors MO-103:S15or4for$39 

Pancake type, 2V4" dia, 14" shaft, 7 5'7steo, 4 phase bidirectional, 300 
slep/sec, 1 2V. 36 ohm. bipolar. 5 oz-in torque, same as Airpax K8270 1 -P2 

Current Developments 

Intelligent Voice Synthesizer, 14 Bit Analog to Digital converter, 4 Channel 
Digital lo Analog ennverter. Counter Timer. Voice Recognition. 

A-BUS Adapters for: 

IBM PC, XT, AT and compatibles. Uses one shori slot AR-1 33. .$69 

Tandy 1 000, 1 000 EX & SX, 1 200, 3000. Usesoneshwt slot AR-1 33. .$69 

Apple II. II+, lie. Uses any slot AR-134...S49 

TRS-80 Model 102. 200 Plurjs into 40 Din "system bus" AR-1 36 .869 

Model 1 00. Uses 40 oin socket (SocKct is duplicalcd on adaDter) AR-135...S69 

TRS-80 Mod 3.4,4 D Fiis 50 nin bus fWilh hard disk, use Y-cable) AR-1 32 $49 

TRS-80 Model 4 P lnclu<Jese>clra cable (50 pin bus is recessed) AR-137 S62 

TRS-80 Model I Plugs into 40 nin I/O bus on KB or Ell AR-1 31 ...S39 

Color Computers (Tandy).Fiis ROM slot Multioak or v-cabie AR-1 38 S49 

A-BUS Cable (3 ft, 50 cond.) CA-163: S24 

Connects the A-BUS adapter to one A-BUS card or lo first Motherboard 
Special cable for two A-BUS cards: CA-162: S34 

A-BUS Motherboard mb-i20:S99 

Each Motherboard holds live A-BUS cards. A sixth connector allows a 
second Motherboard to be added to Ihe lirsl (with connecting cable CA- 
161- S12). Up to live Motherboards can be joined this way lo a single A- 
BUS adapter Sturdy aluminum frame and card guides included. 
• The A-BUS is not a replacement for the Multi-pak 



Add S3. 00 par order (or shloplng 
Visa. MC. checks, MO welcome. 
NY resldants add sales tax. 
C.O.D. add S3.00 oxtra. 
Canada: shipping is S5 
Ovorseas add 10% 




ALPHA [dmfiy®& 



. OXO. 

a division o/ Sigma Industries. Inc. 

242 W. Avenue, Darien, CT 06820 



Technical info' 



(203) 656-1806 



°S y 800 221-0916 

New York orders: (718) 296-5916 
All lines open weekdays 9 lo 5 Eastern lime 




You'll use it all the time and love using it. 



WhatisCoCoMax? 

Simply the most incredible graphic 
and text creation "system" you have 
ever seen. A Hi-Res Input Pack (more 
on the pack later) is combined with 
high speed machine language 
software. The result will dazzle you. 




CoCo Max disk system, with Y-cable 



Is CoCo Max for you ? 

Anyone who has ever held a pencil or 
a crayon for fun, school or business 
will love it. A 4 year-old will have fun 
doodling, a 15 year-old will do class 
projects and adults will play with it for 
hours before starting useful 
applications (illustrations, cards, 
artwork, business graphics, flyers, 
charts, memos, etc.) This is one of the 
rare packages that will be enjoyed by 
the whole family. 

What made CoCo Max an 
instant success? 

First there's nothing to learn, no 
syntax to worry about. Even a child 
who can't read will enjoy CoCo Max. 
Its power can be unleashed by simply 
pointing and clicking with your 
mouse or joystick. With icons and 
pull down menus, you control CoCo 
Max intuitively; it works the same way 
you think. 

Don't be misled by this apparent 
simplicity. CoCo Max has more power 
than you thought possible. Its blinding 
speed will astound you. 
It lets you work on an area 3.5 times 
the size of the window on the screen. 
It's so friendly that you will easily 
recover from mistakes: The undo 
feature lets you revert to your image 
prior to the mistake. As usual, it only 
takes a single click. 
Later, we will tell you about the 
"typesetting" capabilities of CoCo 
Max II, but first let's glance at a few of 
its graphic creation tools: 



With the pencil you can draw free 
hand lines, then use the eraser to 
make corrections or changes. For 
straight lines, the convenient rubber- 
banding lets you preview your lines 
before they are fixed on your picture. 
It's fun and accurate. Lines can be of 
any width and made of any color or 
texture. 

The paint brush, with its 32 
selectable brush shapes, will adapt to 
any job, and make complicated 
graphics or calligraphy simple. 
For special effects, the spray can is 
really fun: 86 standard colors and 
textures, all available at a click. It's 
like the real thing except the paint 
doesn't drip. 

CoCo Max will instantly create many 
shapes: circles, squares, rectangles 
(with or without rounded corners), 
ellipses, etc. Shapes can be filled with 
any pattern. You can also add 
hundreds of custom patterns to the 
86 which are included. 
The Glyphics are 58 small drawings 
(symbols, faces, etc.) that can be used 
as rubber stamps. They're really great 
for enhancing your work without effort. 





Pulldown manus 



Zoom In I 



Control Over Your Work 

CoCo Max's advanced "tools" let you 
take any part of the screen, (text or 
picture) and perform many feats: 
• You can move it around • Copy 
it • Shrink or enlarge it in both 
directions • Save it on the electronic 
Clipbook • Flip it vertically or 
horizontally • Rotate it • Invert 
it • Clear it, etc. etc. 
All this is done instantly, and you can 
always undo it if you don't like the 
results. 

For detail work, the fat bits (zoom) 
feature is great, giving you easy 
control over each pixel. 
To top it all, CoCo Max II works in 
color. Imagine the pictures in this ad 
in color. If you own a Radio Shack 
CGP-220 or CGP-1 1 5, you can even 
print your work in full color ! 




There is so much more to say, such as 
the capability to use CoCo Max 
images with your BASIC programs, 
the possibility to use CoCo Max's 
magic on any standard binary image 
file. There are also many advanced 
features such as the incredible lasso. 




Inside the Hi-Res Input Peck 



Why a Hi-Res Input Pack ? 

Did you know that the CoCo joystick 
input port can only access 4096 
positions (64x64)? That's less than 
10% of the Hi-Res screen, which has 
491 52 points! (256x1 92). You lose 
90% of the potential. The Hi-Res Input 
Pack distinguishes each of the 491 52 
distinct joystick or mouse positions. 
That's the key to CoCo Max's power. 
The pack plugs into the rom slot (like 
a rom cartridge). Inside the pack is a 
high speed multichannel analog to 
digital converter. Your existing 
joystick or mouse simply plugs into 
the back of the Hi-Res Pack. 

Electronic Typesetting... 

You'll be impressed with CoCo Max's 
capability. Text can be added and 
moved around anywhere on the 
picture. (You can also rotate, invert 
and flip it...) At a click, you can choose 
from 1 4 built in fonts each with 1 6 
variations. That's over 200 typestyles ! 




Examples ot printouts 



Printing Your Creations 

There are a dozen ways to print your 
work. All are available with a click of 
your joystick (or mousey vj'rthout 
exiting CoCo Max. Your CoCo Max 
disk includes drivers for over 30 
printers ! 



All the CoCo Max pictures are unretouched screen shots or printouts (Epson RX-80). 




The whole family will enjoy 
CoCo Max. Here are a few 
examples of the possibilities. 

All these pictures are unretouched screen photos 
or printouts (on an Epson RX-80). 



3fem*ott JrUport 
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Publish a newsletter 
or bulletin 
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._ Over 200 typestyles to 
ft) choose from I 
generate flyers. 





Pulley 




©Business graphs, charts, 
diagrams. Also memos 



^^>-fl 




run-gj] 

Junior's homework 
Qj and science projects. 
Term papers too I 



©Video portrait 
(with optional digitizer). 





A new way to express 
your imagination. 



©schematics 
and floor plans. 



{•J This is a cartoon. 

(§£§3/^27 

CcCoMaxK 



CoCo Mas II 

<TT) Logos and letterheads. 



System Requirements: 

Any 64K CoCo and a standard joystick or 

mouse. (The koala pad and the track ball work, 

but are not recommended.) 

Disk systems need a Multi-Pak or our Y-Cable. 

CoCo Max is compatible with any Radio Shack 

DOS and ADOS. 

Note: the tape version ot CoCo Max includes 

almost all the features of CoCo Max II except 

Shrink, Stretch, Rotate, and Glyphics. Also, it 

has 5 fonts instead of 1 4. 

CoCo Max is not compatible with JDOS, 

DoubleDOS, MDOS, OS-9, the X-pad, and 

Daisy Wheel Printers. 

Printers Supported: 

Epson MX, RX, FX and LX series, Gemini, Star, 
Micronix, Delta 1 0, 1 0X, 1 5, 1 5X, SG- 
10,Okidata 82A, 92, 93, C. Itoh Pro-writer, 
Apple Image-writer, Hewlett-Packard Thinkjet, 
RadioShackDMPtOO, 105, 110, 120,200, 
400, 500, Line Printer 7, Line Printer 8, TRP- 
100. CGP-220. (DMP-130 use Line Printer 8), 
PMC printers. Gorilla Banana. 
Color printing: CGP-200, CGP-1 1 5 



Pricing 

CoCo Max on tape $69.95 

with Hi-Res Pack and manual. 

CoCo Max II (disk only) $79.95 

with Hi-Res Pack and manual. 

Upgrade: CoCo Max to CoCo Max II 

New disk and manual $19.95 

New fealutes ol CoCo Max II: 1 4 lonls and glyphic 
font, dynamic shrink and slretch. rotate, multiple drive 
capability. 68 page scrapbook, point and click file 
load, color printer drivers, full error reporting. 

Upgrade: CoCo Max tape to disk 

manuals, disk and binder $24.95 

Y-Cable: Special Price $19.95 

Super Picture Disks #1 , #2. and #3 

each: $14.95 
All three picture disks $29.95 



Guaranteed Satisfaction 

Use CoCo Max for a full month. 

If you are not delighted with it, 

we will refund every penny. 



Font Editor Option 

A font is a set of characters of a 
particular style. CoCo Max includes 
1 5 fonts. You can create new fonts of 
letters, or even symbols or graphics 
with the font editor. Examples: set of 
symbols for electronics, foreign 
alphabets, etc $1 9.95 

Video Digitizer DS-69 

This new Low Cost Digitizer is the 
next step in sophistication for your 
CoCo Max system. With the DS-69 
you will be able to digitize and bring 
into CoCo Max a frame from any video 
source: VCR, tuner, or video camera. 
Comes complete with detailed 
manual and C-SEE software on disk. 
Multi-Pak is required. 

New Low Price Save $50 $99.95 

New: faster DS-69A $1 49.95 



Colorware Incorporated 

[COLORWARE 79-04 A Jamaica Avenue 

Woodhaven, NY 11421 



800 221-0916 

Orders only. 

NY & Info: (71 8) 296-591 6 
Hours: 9-5 Eastern time. 



Add S3. 00 per older tor shipping. 
We accept Visa, MC chocks. MO. 
C.O.D. add S3. 00 extra. m ^^ 

NY and CT : add sales fa*. J~ 
Shipping to Canada Is SS. 00 .^m 
Overseas, FPO, APO add 10% 'W 
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231 ... 


...240 


451 ... 


...218 


751 ... 


...157 


END 
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The listing: BIOCHRRT 

I REM: BIORHYTHM 

II REM: STEVE TENNEY 1987 
21 CLEAR 200:CLS 

31 L=0:T=11:P=3. 14159265 
41 PRINT#-2,"";"********BIORYTHM 
BY STEVE TENNEY********" :PRINT# 

-2,; 

51 PRINT#-2,"";"NAME" 

61 INPUT "NAME ";N$ 

71 PRINT#-2, ;N$ 

81 PRINT#-2,""; "ENTER BIRTH DATE 

ii 

91 PRINT"ENTER BIRTH DATE" 
101 PRINT#-2, IMI ; "MONTH 
DAY YEAR 

III GOSUB 331: GOSUB 451:JB=JD 
121 PRINT #-2,"", '"ENTER START DAT 
E FOR CHART" 

131 PRINT "ENTER START DATE 

141 PRINT* -2,"") r "MONTH 

DAY YEAR 

151 GOSUB 331: GOSUB 451:JC=JD 

161 IF JO=JB THEN 201 

171 PRINT#-2,""; "CHART DATE CAN' 

T BE EARLIER" 

181 PRINT* -2,"", -"THAN BIRTH DATE 
ii 

191 SOUND 8,8:PRINT#-2,""; : GOTO 

81 

201 FOR K=l TO 1000: NEXT 

211 GOSUB 531 

221 N=JC-JB 

231 V=23:GOSUB 601 

241 V=28: GOSUB 601 

251 V=33: GOSUB 601 

261 GOSUB 781 

271 PRINT#-2,""; C$;TAB(8);L$ 

281 JC=JC+l:L=L+l:IF L<15 THEN 2 

21 

291 PRINT"'E' = END, SPACE = GO 

ON" ; 

301 R$=INKEY$:IF R$="" THEN 301 

311 IF R$="E" THEN 931 

321 L=0:GOTO 211 

3 31 PRINT#-2,""; 

341 INPUT "MONTH (1 TO 12) ";M 



3 51 PRINT* -2,"" ; 

361 M=INT(M):IF M<1 OR M>12 THEN 

341 
371 INPUT"DAY (1 TO 31) ";D 
381 D=INT(D):IF D<1 OR D>31 THEN 

371 
391 INPUT" YEAR" ;Y 
401 PRINT#-2, ;M,D,Y,W$ 
411 Y=INT(Y):IF Y<0 THEN 391 
421 IF Y>99 THEN 441 
431 Y=Y+1900: PRINT Y;"ASSUMED." 
441 RETURN 

451 W=0:IF M<3 THEN W=-l 
461 JD=INT(1461*(Y+4800+W)/4) 
471 B=INT(367*(M-2-W*12)/12) 
481 IF B<0 THEN B=B+1 
491 JD=JD+B 
501 B=INT(INT(3*(Y+4900+W)/100)/ 

4) 

511 JD=JD+D-32075-B 

521 RETURN 

531 CLS 

541 PRINT #- 2, ;" (I) INTELLECTUAL ( 

E) EMOTIONAL (P) PHYSICAL" 

551 PRINT#-2," "; TAB(10) ; ■ BIORY 

THM' 



Sample 


Printout 


********BIORYTHM BY STEVE TENNEY******** 


NAME 




JOE X. AMPLE 




ENTER BIRTH DATE 




MONTH DAY 


YEAR 


3 18 


1961 


ENTER START DATE FOR CHART 


MONTH DAY 


YEAR 


4 15 


1987 


(I) INTELLECTUAL (E) EMOTIONAL (P) PHYSICAL 


-DOWN *- 


UP- 


4/15/87 I 


P E 


4/16/87 I 


P E 


4/17/87 I 


PE 


4/18/87 I 


* 


4/19/87 I 


* 


4/20/87 I 


* 


4/21/87 I 


* 


4/22/87 I 


* 


4/23/87 I 


PE 


4/24/87 I 


PE 


4/25/87 I 


PE 


4/26/87 * E 


4/27/87 P E 


I 


4/28/87 P E 


I 


4/29/87 PE 


I 


************BIORYTHM BY STEVE TENNEY******** 


725 N. FIG APT. 56 ESCONDIDO CALIFORNIA 92025 


THE IDEA OF THE BIORYTHM IS TO TELL YOU YOUR 


HIGH AND LOW CYCLES OF 


THE MONTH, SO READ THE 


CHART AND DETERMINE YOUR GOOD DAYS AND YOUR 


BAD DAYS OF THE MONTH, 


FOR MORE INFORMATION 


ON THE BIORYTHM CHECK WITH YOUR LOCAL LIBRARY 


****************HOPE YOU ENJOY**************** 
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561 PRINT#-2," 

UP-"; TAB (12) ; 

571 PRINT#-2," 

581 FOR K=l TO 

25j3 

591 

601 

611 

621 

631 

641 



ii _ 



DOWN- 



";TAB(2p) ; 

T+T+l: PRINT CHR$ ( 



661 
671 
681 
691 
701 
711 
ii 



NEXT:PRINT#-2," ": RETURN 
W=INT(N/V) :R=N-(W*V) 
IF V<>2 3 THEN 661 
L$=CHR$(32) :FOR K=l TO 4 
L$=L$+L$:NEXT 
L$=LEFT$(L$,T)+CHR$(3p ) +LEF 

T$(L$,T) 

651 IF V=23 THEN C$="P" 
IF V=2 8 THEN C$="E" 
IF V=3 3 THEN C$="I" 
W=R/V:W=W*2*P 
W=T*SIN(W) :W=W+T+1.5 
W=INT(W) :A$=MID$(L$,W,1) 
IF A$="P" OR A$="E" OR A$="* 
THEN C$="*" 

721 IF W=l THEN 761 

731 IF W=T+T+1 THEN 771 

741 L$=LEFT$(L$,W-1)+C$+RIGHT$(L 

$,T+T+1-W) 

751 RETURN 

L$=C$+RIGHT$(L$,T+T) : RETURN 
L$=LEFT$ (L$ , T+T) +C$ : RETURN 
W=JC+68569:R=INT(4*W/14 6p97) 
W=W-INT( (146097*R+3)/4) 
Y=INT(4j3j3j3*(W+l)/14610j31) 
W=W-INT ( 14 61*Y/4 ) +31 
M=INT(8j3*W/2 447) 
D=W-INT(2447*M/80) 
W=INT(M/11) :M=M+2-12*W 
Y=l^p*(R-49)+Y+W 
A$=STR$(M) :W=LEN(A$)-1 

C$=MID$(A$,2,W)+"/" 
A$=STR$(D) :W=LEN(A$)-1 
C$=C$+MID$ (A$ , 2 , W) +"/*' 
A$=STR$(Y) :W=LEN(A$)-1 
C$=C$+MID$(A$,W,2) 
RETURN 



761 
771 
781 
791 
801 
811 
821 
831 
841 
851 
861 
871 
881 
891 
901 
911 
921 
931 
THM 
941 



PRINT#-2, ;»************BIORY 



BY STEVE TENNEY********" 
PRINT#-2,;" 725 N. FIG APT. 5 
6 ESCONDIDO CALIFORNIA 92025" 
951 PRINT#-2, ;"THE IDEA OF THE B 
IORYTHM IS TO TELL YOU YOUR" 
961 PRINT#-2, ;"HIGH AND LOW CYCL 
ES OF THE MONTH, SO READ THE" 
971 PRINT#-2, ;" CHART AND DETERMI 
NE YOUR GOOD DAYS AND YOUR" 
981 PRINT#-2, ;"BAD DAYS OF THE M 
ONTH, FOR MORE INFORMATION" 
991 PRINT#-2, ;"ON THE BIORYTHM C 
HECK WITH YOUR LOCAL LIBRARY" 
1001 PRINT#-2, ;"**************** 
HOPE YOU ENJOY****************" 



Now Create Your Own Signs, 
Banners, and Greeting Cards. 



Introducing The 
Coco Graphics Designer 

Last Christmas we introduced our 
COCO Greeting Card Designer program 
(aee review April 86 Rainbow), It hu 
been so popular that we've now 
expanded it into a new program called 
tha COCO Graphica Designer. The 
Coco Graphic* Daiigner produce* 
greeting cards plui banner* and ligni. 
Thii program will further increase tha 
usefullnees and enjoyment of your dot 
matrix printer. 

The Coco Graphics 

Designer allowa you to mix taxt and 

picture* in all your creation*. Tha 
program feature* picture, border, and 
character font editora, ao that you can 
modify or expand tha already built in 
libraries Plui a ■pecial "grabber" utility 
ii included to capture area* of high 
resolution screens for your picture 
ibrary. 



Requirements: a Coco or Coco II 
with a minimum of 32K, One Diak Drive 
(Diak Ext. BASIC 1.0/l.l.ADOS, or 
JDOS). Printera aupported include; 
Epion RX/FX, GEMINI 10X, SG-10, 
NX-10, C-Itoh 8610, DMP-100/ 1.10/ 
400/ 430, Seikosha CP-100/250, Legend 
80S and Gorilla Bannana. Send a SASE 
for complete Hat of compatible printer*. 
#C332 Coco Graphlce Designer $29.05 



Over 100 More Pictures 

An optional supplementary library 

diskette containing over one hundred 
additional pictures is available. 

#C333 Picture Disk #1 114.95. 



Colored Paper Packs 

Now available are packs containing 120 
sheets of tractor-feed paper and 42 
matching envelopes in assorted bright 
RED, GREEN, and BLUE. Perfect for 
making your productions unforgettable. 
#C274 Paper Pack $19.95 




With Zebra's Coco Graphics Designer It's easy and enjoyable 
making your own greeting cards, signs, and banners. 




WICO 

TRACKBALL 

Now $19.95 

Order Cat#TBRS01 

(Was $69.95) 

You can benefit from our purchase of 
brand new WICO Trackball Controller! 
at closeout pricee. This model was 
designed specifically for the Radio 3hack 
Color Computer and plugs right into tha 
joystick port. 

WICO is tha largest designer and 
manufacturer of control devices for 
commercial arcade video games. If 
you've ever played an arcade video 
game, chances are you've used a WICO 
joystick or trackball and experienced its 

We have bargain priced trackballs for ATARI, Commodore, TI, 
and other computers. Call or write for our price list. 



superior control, pinpoint firing 
accuracy, and exceptional durability. 

Include! one-year limited warranty. 
Phoenolic ball ofTera SCO-degree 
movement. Two optical encoders 

provide split-second response. 

Quick-action fire button for smooth, two 
handed arcade response and feel. Long 
5' computer connection. Heavy duty 
plastic case for long hard use. 
Compatible with all color computer 
models. 



Ordering Instructions: All orders 

add $3.00 Shipping ti Handling. UPS 
COD add 13.00. VISA/MC Accepted. 
NY reeidenti add sales tax. 



Zebra Sytems, Inc 

78-06 Jamaica Ave. 

Woodhaven, NY 11421 

(718) 296-2385 
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PRINTER UTILITY 
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RBIHBOWFEST 1999 

Th. Show of Show 

ADMIT ONE 

Jjase CoCo. The Hoot, 

a^ShttttlePsds 



©0 




Kaihryn Rocci lives in Sandwich, 

Massachusetts, is a self-taught programmer 

and has owned her Co Co for two years. Besides her 

family, Kathryn enjoys programming and woodworking. 



Planning a neighborhood dance? How 
about a Christmas party for work? Now 
you can custom-design tickets using a 
CGP-220 printer and Ticket- Wicket. 
With the auto-numbering feature, 
you can easily keep track of your tickets. 
Other features include options to choose the 
size of line feed, number of tickets printed, 
color of each line, size of print in each line, 
individual line placement (left-centered- 
right), and, if necessary, date and time 
are available too. 
You should use roll paper (Radio 
Shack Catalog No. 26- 1 333) so it can 
print continuously. 
When you run Ticket- Wicket, 
you are greeted with a title screen. 
Press any key to continue. I 
should mention a feature that 
allows only the answer 
prompted to be entered. This 
should eliminate errors in 
formatting your tickets. 
After you have answered 
the first few prompts, you 
will see a "Line 1 " prompt. 
This is where you enter the 
first line of the ticket. Once 
you have entered and set the 
standards for each line, you 
will come to a "Date" 
prompt. If a date and time 
are necessary, enter it in a 
month day, year format 
(May I, 1987). Use this for- 
mat for time: (0)0:00 p.m. 
or a.m. Certain times will 
not require the extra space. 
This has been considered and 
the margins will be determined 
as needed. If you do not require 
a date or time, simply enter X and 
those prompts will be passed over. 
At this point printing begins. The 
screen is updated with the ticket 
number being printed. □ 

(Questions about this program 
may he addressed to the author at 5 
Dukes Drive. Sandwich. MA 02563. 
Please enclose an SA SEfor a reply.) □ 
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Line 


Function 


10-240 


Creates title screen. 


260 


Sets 2400 printer baud rate. 


360 


Sets printer line-feed size. 


450-700 


For-Next loop to input each line and its 




standards. 


710-830 


Date and Time information and color. 


850 


Starts printing loop. 


870 


Prints dotted black line between tickets. 


880 


Starts printing loop for number of lines 




specified. 


890-940 


Sets specified margins for each line. 


950 


Sends codes to printer for print size. 


960 


Sends codes to printer for color. 


970 


Sends tab size to printer for margins. 


990 


Determines if user wants Date and Time. 


1010 


Codes for standard print size and color for 




Date/ Time. 


1020 


Sets margins and prints Date/ Time. 


1060 


Sets color to black and size to elongated. 


1070 


Prints ticket number. 


1080 


Sets print size back to standard. 


1090 


Prints dotted line after last ticket. 


1 100 


Continues printing loop back to Line 850 




for the next ticket. 



w** 



200 70 

360 192 

580 158 

780 251 

950 211 

END 112 



CHR$(143+ 
+ CHR$(14 



+ 



The listing: TICKET 

10 CLS 

20 P$=CHR$(143+16*X) + 

16*X) + CHR$(143+16*X) 

3+16*X) 

30 M$= *************************** 

*******" 

40 W$="* 
*» 

50 Q$=CHR$ (129+16) + CHR$ (132+32 

) + CHR$ (133+48) + CHR$ (134+64) 

+ CHR$ (139+80) + CHR$ (142+96) 

CHR$ (141+112) t CHR$(128) 

60 PRINT@3 2,Q$;Q$;Q$;Q$ 

70 PRINT@ 9 6,M$ 

80 PRINT§128,W$ 

90 PRINT @ 160,"* 

icket *" 

100 PRINT@192,W$ 

PRINT@ 224,"* 

printer *" 

PRINT§256,W$ 

PRINTS 2 8 8, M$ 

PRINTS 3 20,"* 
rocci *" 



11)3 

220 

120 

130 

140 

yn 

150 PRINT@352,M$ 



ticket-w 



for the cgp- 



by kathr 



160 


PRINT§416,Q$;Q$;Q$;Q$ 


170 


FOR X=1T07 


180 


PLAY STR$(X):PLAY STR$(X+1) 


190 


P$=CHR$(143+16*X) + CHR$(143 


+ 16 


*X) + CHR$(143+16*X) + CHR$(1 


43+16*X) 


200 


PRINT@ 2 , P$ ; P$ ; P$ ; P$ ; P$ ; P$ ; P$ 


210 


PRINT@482 , P$ ; P$ ;P$ ; P$ ; P$ ; P$ ; 


p$; 




220 


I$=INKEY$:IF I$=""THEN 230 E 


LSE 


2 50 


230 


NEXT X 


240 


GOTO 170 


250 


CLS: FOR K=l TO 512 STEP 32 :P 


RINT§4+K,"IS YOUR PRINTER READY" 


;:FOR G=l TO 100: NEXT G,K 


2 60 


CLS: POKE 150,18 'set 2400 ba 


ud 




270 


DIM L$ (100): DIM SZ$(100):DIM 


CL$(100):DIM PL$(100):DIM BB$(1 


00) 


:DIM B(150) 


280 


CLS4:PRINT@198, "STANDARD LIN 


E FEED=S"; 


290 


PRINT@2 64,"3/4 LINE FEED=T"; 


300 


PRINT@332,"S OR T" ; 


310 


PRINT@3 99,""; 


320 


LINEINPUT LF$ 


330 


IF ASC(LF$)<83 OR ASC(LF$)>8 


4 THEN 280 


340 


IF ASC(LF$)=83 THEN C=54 


350 


IF ASC(LF$)=84 THEN C=56 


3 60 


PRINT#-2,CHR$(27) ;CHR$(C) • se 


t 3/4 If 


370 


CLS3:PRINT@261 ,"# OF TICKETS 


WANTED?"; : PRINT@333 , "" ; 


380 


LINEINPUT N$ 


390 


N=VAL(N$) 


400 


Z=ASC(N$):IF Z<48 OR Z>57 TH 


EN 370 


410 


CLS2: PRINT @ 2 61, "# OF LINES 


PER TICKET?"; : PRINT© 333,""; 


420 


LINEINPUT LP$ 


430 


Y=ASC(LP$) :IF Y<48 OR Y>57 


THEN 410 


4 40 


LP=VAL(LP$) 


450 


CLS4: FOR A = 1 TO LP 


4 60 


PRINT"<LINE:> "A"?" ; : LINEINP 


UT L$(A) 


470 


T(A)=LEN(L$(A)) 


480 


PRINT"<PRINT SIZE:> LINE "A; 


490 


PRINT 


500 


PRINT"STANDARD=15 ELONGATE 


D=l' 


t"; : PRINT 


510 


LINEINPUT SZ$(A) 


520 


SZ(A)=VAL(SZ$(A) ) 


530 


IF SZ(A)<14 OR SZ(A)>15 THEN 


SOUND 20,3:CLS4:GOTO480 


540 


IF SZ(A)=14 AND T(A)>45 THEN 



May 1987 THE RAINBOW 27 



SOUND 2,0,6:CLS4:GOTO 4 60 
550 IF SZ(A)=15 AND T(A)>91 THEN 

SOUND 20,6:CLS4:GOTO 460 
560 PRINT" <COLOR:> LINE "A; 
570 PRINT 
580 PRINT"3LK=48 RED=49 GR=50 

YEL=51 VLT=52 PK=53 BL=54" 

590 PRINT 

600 LINEINPUT CL$(A) 

610 CL(A)=VAL(CL$(A) ) 

620 IF CL(A)<48 OR CL(A)>54 THEN 

SOUND 20,3:CLS4:GOTO 560 
630 PRINT "<LINE PLACEMENTS LINE 

"A; 
640 PRINT 
650 PRINT"LEFT=L CENTERED=C 

RIGHT=R" ; 
660 PRINT 

670 LINEINPUT PL$ (A) 
680 IF ASC(PL$(A) ) =67 OR ASC(PL$ 
(A)) =76 OR ASC(PL$(A) )=82 THEN 7 
00 ELSE 690 

690 SOUND 20,3:CLS4:GOTO 630 
700 NEXT A 

710 PRINT"<DATE:> X=SKIP DATE AN 
D TIME";: PRINT 
720 LINEINPUT DT$ 

730 IF LEFT$(DT$,1)="X" THEN 840 
740 PRINT "<TIME:>";: PRINT 
750 LINEINPUT TM$ 
760 TM=LEN(TM$) 

770 IF TM=9 THEN TT=82 ELSE TT=8 
1 

7 80 PRINT" <COLOR FOR DATE AND TI 
ME>"; : PRINT 

790 PRINT"<DATE AND TIME=STANDAR 
D PRINT>"; : PRINT 
800 PRINT"BLK=48 RED=49 GR=50 

YEL=51 VLT=52 PK=53 BL=54" 
; : PRINT 

810 LINEINPUT DC$ 
820 DC=VAL(DC$) 
830 IF DC<48 OR DC>54 THEN SOUND 

20,3:CLS4:GOTO 780 
840 WW$=" 

ii 

850 FOR B=l TO N 

860 CLS4:PRINT§2 28,"NOW PRINTING 

TICKET #"B; 
870 PRINT#-2,CHR$(27) ;CHR$(84) ;C 
HR$(48)WW$ 
880 FOR A=l TO LP 

890 IF SZ(A)=14 AND PL$(A)="C" T 
HEN TB(A)=( (91/2)-T(A) )/2 
900 IF SZ(A)=15 AND PL$(A)="C" T 



HEN TB(A)=(91-T(A) )/2 

910 IF SZ(A)=14 AND PL$(A)="L" T 

HEN TB(A)=5 

920 IF SZ(A)=15 AND PL$(A)="L" T 

HEN TB(A)=10 

930 IF SZ(A)=14 AND PL$(A)="R" T 

HEN TB(A)=( (91/2) -T(A) ) -5 

940 IF SZ(A)=15 AND PL$ (A) ="R" T 

HEN TB(A)=(91-T(A))-10 

950 PRINT#-2,CHR$(27) ;CHR$(SZ(A) 

) 

9 60 PRINT#-2,CHR$(27) ;CHR$(84) ;C 

HR$(CL(A) ) 

970 PRINT#-2,TAB(TB(A) )L$(A) 

980 NEXT A 

990 IF LEFT$(DT$,1)="X" THEN 103 

1000 PRINT#-2 

1010 PRINT#-2,CHR$(27) ;CHR$(15) ; 

CHR$(27) ;CHR$(84) ;CHR$(DC) ; 

1020 PRINT#-2,TAB(5)DT$TAB(TT)TM 

$ 

1030 IF B<10 THEN BB$=" 00# 

ii 

1040 IF B>9 THEN BB$=" 0## 

ii 

1050 IF B>99 THEN BB$=" ### 

ii 

1060 PRINT#-2,CHR$(27) ;CHR$(84) ; 

CHR$(48) ;CHR$(27) ;CHR$(14) : PRINT 

#-2 

1070 PRINT#-2, USING BB$;B,B 

1080 PRINT#-2,CHR$(27) ;CHR$(15) 

1090 IF B=N THEN PRINT#-2,WW$ 

1100 NEXT B 



One- Liner Contest Winner . . . 

This program, intended for the DMP-105, will print 
out your disk directory. Change or remove the control 
codes if you own a different printer. 

The listing: 



10 CLS:INPUT"NAME OF DISK" ;N$ : IN 
PUT"SIDE" ;S: PRINT #-2,CHR$(27) ;C 




) ; (JUKI? ( j z ) ; cm<:? (z i ) j «JtiK? ( x» ; : rvis 
E 111,2 54:DIR:PRINT #-2,CHR$(13) 
:GOTO 10 

Joon Y. Kim 
Bristol, TN 

(For this winning onc-lincr contest entry, the author has been sent copies of 
both The Second Rainbow Book of Simulations and its companion The Second 
Rainbow Simulations Tape.) 
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Mak i r-ig the 



cro World! 



CdCd' s AFFORDAB 



CoCo 
CoCo III 
Drive 



$87 

$169 

$235 



CM-8 Monitor 



Deluxe Joystick 

Mouse 

MultiPak 

CCR-81 Cass. Rec. 

Joysticks (pair) 

Disk storage box (50) 



$24 
$40 
$75 
$42 
$ 9 
$ 8.50 



Disks (SS) 
Disks (DS) 



$7.50/box 
$8.00/box 



includes free library case 



DMP-430 

DMP-130A(120CPS) 

DWP-230 



Tandy 1000 EX 
Tandy 1000 SX 



VM-4 Monitor 
CM-10 Monitor 
CM-5 Monitor 




CoCo 3 51 2K Upgrade $130 

MultiPak Upgrade (26-3024) $ 8 

MultiPak Upgrade (26-3124) $ 7 

OS-9 Level 2 $ 69.95 

We will have as soon as available. Call for status. 



» Please Note - Our ads are submitted 
early, bo price* are subject to chanae!!! 
We appreciate your cooperation 8*.. 
understanding 1n this matter. 



T&XR fif»ifta<Si£ ILliSIf A^AaiLJfcSHUK 

soasSs. a&K ©anr s>jlsl it&smTr auuwwAiftit 



Full TANDY 
Warranty 
100* TANDY 
PRODUCTS 
* FREE Shipping 
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Get Chart Smart With Mileage 

Mapper 




By Bill Bernico 




M 



6 



aps have always fascinated me. 

Maps and travel, that is. This 

country seems small when you 

look at it on a map, but just try driving 

fed the length of it sometime. It'll be the 

longest five or six days you ever lived. 

The following program will show 

you, using Hi-Res graphics, just how far 

it is from any point in the United States 

to any other point. It should be accurate 

to within 15 to 20 miles. 

The operation is quite simple. Pick a 
starting point and a destination point, 
and the distance is displayed on the 
screen. The only tricky part is picking 
the two points. When you first run the 
program, a framed map is drawn. After 
that, a message telling you to move the 
cursor to the starting point appears. 
You must hold down the right joystick 
button before the message "Move cur- 
sor to starting point and hit enter" is 
finished being displayed. Once the 
message is completely displayed, you - / 
can release the button. Now you can ^g^.; 
move the cursor around on the map to 
|determine your starting point. 
.7., You can move in one of two ways. 
First, you can simply move the joystick 
lever around and the cursor will move. 




£ 






oo52-Q. 7. 

6 o A a- 

0/0 5?"$Second, if it moves too slowly for you, 
"6/ **\ jjj-jhold down the right joystick button 
while moving and it will scoot along 
much faster. 

When you get to your chosen starting </>| 
point, center the joystick to stop any ■£ 
further movement and press ENTER. A 
small circle will form around the start- 




ing point. Quickly hold down the joy- 
stick button before the message "Move 



Bill Bernico is a self-taught computerist 
who enjoys golf, music and program- 
fining. He is a drummer with a rock band 
and lives in Sheboygan, Wisconsin. 
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cursor to destination point and hit 
enter" is completely displayed. When 
that entire message is on the screen, you 
can release the button and move around 
on the map once again, using the same 
method as when choosing the starting 
point. 

The cursor now leaves a trail behind 
it as it moves across the map. This is 
your path. Holding in the button pro- 
duces long, coarse moves, while releas- 
ing the button smooths out the path of 
the cursor. When you reach your des- 
tination point, center the joystick and 
press ENTER again. A second circle will 
form around the destination point. 

A message displaying the mileage will 
appear for a few seconds. After it is 
erased, the last message will tell you to 
press the space bar to try another. If you 
choose to try again, remember to hold 
in the joystick button before the first 
message appears and then follow the 
steps as before. 

You may notice the mileage is not 
cumulative. That is, if you travel for 
1,000 miles in a circle and end up in the 
same area you started from, your mile- 
age will not be 1,000. More likely, it will 
be under 50. It computes the mileage 

v^ 1 *i 
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from one point to another. Still, it's a 
nifty way to calculate distances in the 
U.S. 

My thanks to one of my pen pals, 
Matt Krom, for assisting with some of 
the subroutines. 

(Questions about this program may 
be directed to Mr. Bernico at 708 Mich- 
igan Avenue, Sheboygan, WI 53081, 
414-459-7350. Please include an SASE 
for a reply when writing.) □ 

Editors Note: This program contains 
packed lines. If the computer won't 
allow you to enter the last few charac- 
ters of a given line, go ahead and press 
ENTER. Then type EDIT line number 
and press X to enter the editor's "ex- 
tend" mode. Now you can enter the 
remaining characters of that line. 



mm 



miiiiiiiiiiiiiiiiiiimnmiiiiiiiiiiiiiiiiiiimiiiiiiiiiiii 




MODE CURSOR TO STORTING POINT 
OND HIT ENTER 



^ 50.... 


...170 


Y 80 ... . 


...166 


120 ... 


...164 


190 .. . 


...211 


410 ... 


8 


END ... 


...176 





The listing: DISTANCE 

10 CLEAR5)3j3:DIMA$(9j3) ,A(1,2) : D$ ( 
0)="H5":D$(1)="L5 II :D$(2)="G5 ,, :D$ 
(3)="U5" :D$(5)="D5":D$(6)= ,I E5":D 
$(7)=' I R5":D$(8)="F5" : A$ (32) ="BR6 
" : A$ ( 48 ) =" BDD4FU6R3D6NL3EU4BUBR3 
" : A$ ( 4 9 ) =" BDED6RU6BR3 " : A$ ( 5j3 ) =" B 
DRUR2DRG4DNE4R4BU6BR3":A$(51)="R 
5LD2NL3D4L3HBR5U2BU3BR3 
2j3 A$ ( 52 ) ="BR3G3DR6L2U4D6RU6BR3 " 
:A$(53)="ND2R5L4D2R3D4L3HBR5U2BU 
3BR3 » : A$ ( 54 ) ="BR4L2DLGD3FNU4R3U3 



NL3FDBU5BR3" : A$ (86) ="D6RNU6R2EU5 

RND4BR3 " : A$ ( 87 ) ="D6RNU6R3U6RD6R2 

EU5RND4BR3":A$(89)="D2FNU3RD3RU3 

RU3RND2BR3":A$(85)="D5FNU6R3U6RN 

D5BR3" : A$ (84) ="R2D6RU6R2BR3 

30 A$(55)="R5DRG4DNRE4U2BR3 M :A$( 

56)="BRNR3D6HUBU2UF2R2D3NL3EUBU2 

UHND6BR4":A$(57)="BRNR3D3HNUFR3U 

3D4G2LR2E2U3BUBR3**:A$(58)= ,, BDDBD 

2DRUBU2UBUBR3" :A$(59)=»'DBD2D2BGR 

U2BU2UBR3":A$(60)="BR3G3F3RH3E3N 

R3" :A$(61)="BD2R4BD2L4BU4BR7":A$ 

(62)="F3G3RE3H3BR6 

40 A$(63)="BDER3DG2DE3DG2BD2LBU6 

BR6" :A$(65)="BDD5RU6R3D4NL3D2RU5 

BUBR3":A$(66)="D6RU6R3DRNDLD2NL3 

DRNDLD2L3BU6BR7":A$(67)="BDD4RDU 

6R2FBD4GL2BU6BR6":A$(68)="D6RU6R 

3D6ENU4GL3BU6BR7":A$(69)="D6RU6R 



LOWEST CONTROLLER PRICE EVER!! The New JFD-EC, Only $75 

NOW COCO 3 Compatible * 




JFD-EC DISK CONTROLLER 

The JFD-EConomical controller combines the best features of the 
I original JFD-COCO with 
the two switchable ROM 
| sockets, fully buffered data 
lines and Memory Minder 
in ROM. The JFD-EC re- 
I places the JFD-COCO in 
I our product line at an even 
I lower price. The controller 
includes JDOS, the JDOS 
I manual andMemoryMind- 
er in ROM. (Precision Alignment Disk not included.) 
JFD-EC Disk Controller with JDOS S75 

OPTIONS 

Precision Alignment Diskfi Memory Minder Manual 0IS S 40.00 

PrecisionAlignmentDisk&MemoryMinderManualS/S S 26.00 

JFD-ECDiskControllerwithRSDOSl.l S 75.00 

JFD-ECDisVControllerwithJDOSandRSDOSl.l $ 95.00 

JFD-EC Drive O System with one double sided drive $250.00 

JFD-EC Drive 0. 1 System with two double sided drives S365.00 

•JFD-EC and JFD-l'P irith JDOS or RS DOS are COCO 3 compatible. 



NEW TERMS 

One year warranty on parts & labor. Free shipping 
via UPS in continental United Stales for payment by 
Visa. MasterCard or Cashiers check. Blue Label & 
foreign shipping extra. 



DRIVE SYSTEMS 

Drive systems include our JFD-CPor JFD-EC 
disk controller. JDOS with Memory Minder 
in ROM and one or two half-height floppy 
drivels) with case and power supply. 

<//A 

UM SYSTEMS, LTD. 

15100-A CENTRAL SE 

ALBUQUERQUE, NEW MEXICO 87123 

505/298-4182 




JFD-CP DISK CONTROLLER 

Our new JFD-CI'. compatible with the original COCO. COCO 2 and 

the new COCO 3. features 
a parallel port to support a 
Centronics compatible 
printer or our hard drive, 
and an external ROM 
I switch, which allows you to 
; select JDOS or an optional 
RS DOS-type ROM. It 
comes in a case and in- 
cludes JDOS 1 .2 and man- 
ual. JDOS implements all RS DOS commands, plus many more, in- 
cluding auto line numbering, error trapping, baud rate selection, 
OS/9 boot from floppy or hard drive, and Memory Minder, our disk 
drive analysis program. (Precision Alignment Disk not included.) 
JFD-CPDiskControllerwithJDOS $ 99.00 

OPTIONS 

PrccisionAlignmcntDisk&MemnryMinderManualD/S $ 40.00 

Precision Alignment Disk & Memory Minder Manual S/S $ 26.00 

JFD-CP Disk Controller with RS DOS 1.1 S 99.00 

JFD-CP Disk Controller with JDOS and RS DOS 1 . 1 i 1 1 9.00 

JFD-CP Drive O System with one double sided drive S265.00 

JFD-CI' Drive 0. 1 System with two double sided drives $379.00 
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3BD3BLL2D3R3BU6BR3" : A$ (70) ="D6RU 

6NR3D3R2BU3BR4 

50 A$(71)="BDD4FU6R3FBD2D3LNU3L3 

BU6BR7":A$(72)="D6RU6D3R3U3D6RU6 

BR3 ,, :A$(73)="NLD6NLRNRU6RBR3":A$ 

(76)="D6RNU6R2BU6BR3":A$(77)="ND 

6RD2ED2ED2E3D5RU6BR3":A$(78)="ND 

6FD2ED2ED2FU6BR3" : A$ (83 ) ="BDDFRF 

2NH3DL3ULBR5UHDH3UR3DRBUBR3" :A$ ( 

80) ="D6RU6R3D3NL3EUBUBR3 

60 A$(79)="BDD4FU6R3D6NL3EU4BUBR 

3":A$(82)="D6RU6R3D3L2F3RH3REUBU 

BR3 " : PM0DE4 , 1 : PCLS 1 : SCREEN1 , 1 : CO 

LOR0,1: LINE (0,0) -(255, 191) ,PSET, 

B : LINE ( 5 , 5 ) - ( 2 50 , 18 6 ) , PSET , B : LIN 

E (10, 10) -(245, 181) ,PSET,B:POKE17 

8,1 :PAINT (2, 2) , ,0:POKE178,2:PAIN 

T(7,7) , ,0:POKE178,0 

70 DRAW"BM36,20D2L2F2D7M33,47M32 

,64M3 5,75R2D2L2M41,89M45,90M54,1 

01D2R10M77 , 107R10UR5M97 , 112D3M10 

3 , 117M104 , 115M109 , 116M116 , 125M12 

4 , 128U6M12 6 , 118M12 9 , 12 2M? 30, 115R 

9M141,117R7M145,113M156,112M160, 

114M163 , 112M167, 118D3M171, 12 7D2M 

173 , 131M17 8 , 129U8M177 , 116 

80 DRAW"M172,107M175,102M178,101 

M179,98M191,85M189,75M193,77M194 

, 75U3R3M200 , 65M198 , 64M199 , 61M197 

, 59M207 , 56M212 , 53U2R2DM215 , 51U2L 

2UL2U6M220,40M221,35M218,34U8M21 

5,27M210, 25M207, 3 5M204 , 3 6L12M181 

, 43L3M174 , 47R2D2L2M163 , 54M168 ,43 

U3R2D2R2U2M169 , 34M159 , 32 

90 DRAW"U7L4U2M147,22M142,25M126 

, 20L90BM36, 34M39 , 35D2M48 , 36R9M57 

, 20D24M55, 4 6M58 , 47D6BM3 2 , 54R43BM 

49 , 54D18M65 , 87M67 , 90M64 , 93D10BM6 

8 , 54D30L3D3BM62 , 20D8R2D8M67 , 37M6 

9,44R7NU2D16R21U40BM75,42R22BM76 

, 60R29BM84 , 60D47BM68 , 81R59BM105 , 

60D21BM102 , 81D23M92 , 104D2 



********** 

* 

* 

* 

* 
********** 



CoCo II&III Graphics Editor 
II-32K HI-128K 

Tape/ Disk $20 

Payment must accompany order. 

La. residents add 5.8% sales tax. 

Jason Guilbeau 

1 15 Mendell Drive 
Carencro, La. 70520 



100 DRAW"BM102,84R10D9M119,96R12 
M13 3 , 115BM127 , 81D2R2D14BM119 , 20D 
6M121, 29M118 , 37NL21M121, 40D14M11 
8,53GM115,53L18BM121,53M12 3,56M1 
22,62M125,66M127,69D12BM105,66R2 
0BM143,2 5M13 6,32D2L2M13 4,40M137, 
51R11DR2BM121,48R14M137,65U13BM1 
49,51M150,53M151,56D4 
110 DRAW n M149,73M145,75M143,78BM 
137 , 65M145 , 81D3L3U2L14BM142 , 84M1 
37 , 97DL6BM137 , 97M139 , 100M138 , 103 
M140 , 108R4M145 , 113BM139 , 90R29BL1 
9M148 , 112R4U4R8M158 , 90BM159 , 109R 
9UR4BM173 , 104M168 , 93DL2M169 , 89R5 
DR6BM180 , 90M183 , 93BM144 , 83R4UR41 
BM158 , 90M160 , 87R3M168 , 82 
120 DRAW'"BM149,73M150,74M153,72R 
M160,69U15D13M161,69FM165,70M170 
, 78R3M174 , 74M177 , 7 3M178 , 72M181 , 7 
1M187,72M189,77BM163,81M168,78BM 
136 , 31M140, 30M144 , 3 4R2M148 , 40M15 
1, 38M149 , 44M148 , 51BM142 , 31M150 , 2 
7M149 , 30M152 , 31M156 , 29M159 , 3 3M15 
5,34M150,3 5M149,39BM159,33 
130 DRAW"M155,37M153,43D4M150,53 
BM157 , 35M161 , 3 7D7R2U3M165 , 42M166 
,47BM150,54R19M176,50U3M183,44FB 
M172,52D16M191,68M194,69D3BM189, 
68D3R6BM172 , 64M169 , 67M164 , 70BM17 
5 , 68D4R5BM175, 51D4R13M19 3 , 58R4U9 
R2U12BM192 , 58M191, 63M19 3 , 64M191, 
68BM197,51R12M210,54 
140 DRAW"BM205,51D6BM199,46M207, 
47M210,44BM204,3 6M205,3 9M203,43D 
4BM209 , 32M208 , 35M209 , 43RBM202 , 60 
M209 , 58M210 , 60M206 , 61M202 , 60BM12 
5,65R12BM22,150":A$= ,I MOVE CURSOR 
TO STARTING POINT" : GOSUB590 : DRA 
W"BM70,160":A$= M AND HIT ENTER.": 
GOSUB590:H=128:V=60 
150 GET(H-2,V-2)-(H+2,V+2) ,A:LIN 
E (H-2 , V-2 ) - (H+2 , V+2 ) , PSET : LINE (H 
+2,V-2)-(H-2,V+2) ,PSET 
160 GOSUB510 

170 IF PEEK(338)=191 THEN 280 
180 F=0:G=0 

190 IF X<5 AND H<>3 THEN F=-l 
200 IF X>58 AND H<>252 THEN F=l 
210 IF Y<5 AND V<>3 GOSUB270:V=V 
-1:GOTO150 

220 IF Y<5 AND V<>3 THEN G=-l 
230 IF Y>58 AND VO140 THEN G=l 
240 IF F=0 AND G=0 THEN 160 
250 IF XY=1 THEN IF (H+F*5)>3 AN 
D (H+F*5)<252 AND (V+G*5)>3 AND 
(V+G*5)<140 THEN F=F*5:G=G*5 
2 60 GOSUB270:H=H+F:V=V+G:GOTO150 
270 PUT (H-2, V-2) -(H+2, V+2) ,A:RET 
URN 
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Four new programs for the CoCo 




DAMAGE I 1 



QHUI3G3 

COUNT I 2J I 



FIRE ONE! 



Submarine warfare in World War II. Completely high resolulion graphic 
game in which you become the skipper of the USS Squalus. From the 
bridge you set the course and speed, check radar, plot the course, 
receive radio reports, up the periscope and track the convoy or go on a 
special mission. Twenty six scenerios with many more Computer keeps 
track ot torpedoes, battery level, diesel fuel, oxygen suoply and more 
Four torpedo tubes torward or deck gun are used to send those transports 
to the bottom But watch out lor those deadly patrol vessels. Crash dive, lull 
right rudder, lull speea ahead . sweat out those depth charge attacks 
Provisions tor on-surface repair. Target Data Control, special missions, 
radio reports, raddr tracking, map plotting, hull damage, depth alarm, 
exploding ships, ship's log (patrol vessels and transports, missions 
completed, points accumulated! (our speeds torward. one reverse, 
navigation, islands, tour periscope positions, supply vessel, visual 
sightings, and plenty of fun and excitement 
System requirements: CoCo III computer, disk drive. $32. OO 




The sequel to Red Star. The Soviet Union has taken control of Europe 1 You 
must rescue Europe from Soviet control and then have the oplion of 
invading Russia High resolution screens scrolls up, down, right, 
led attack modes, unit icons and more. ECB 64K CoCo I, II, III disk. 
Colorless on RGB monitors. $27.00 



CharGen 




STALINGRAD 



You become General Von Paulus in command of the German Sixth Army 
consisting of Panzers. Infantry, Mechanized Units, with support from 
Bombers and Fighters of the dreaded Luftwaffe. Starling in the summer ot 
1942 you begin your offensive knowing lhal you have only so much time lo 
take control of the city and then defend it from overwhelming Russian 
counterattack Completely high resolulion graphics for ECB 64K CoCo I, 
II, III disk or tape. Colorless on RGB monitors. $28.00 




CoCo III high resolulion character generator makes special character set 
that can be used in all sorts of applications Easy to use Creates as many 
files as desired Disk only, CoCo III only. $12.00 



Mammoth game o( Napoleon's Waterloo campaign Player battles 
combined armies of England, Russia and Austria Completely hi res 
ECB 64K CoCo I, II, III, disk. Colorless on RGB monitors. $27,00 



KEYBOARD GENERAL 



Had you subscribed to the Keyboard General back in August and taken 
advantage of our special discounts, you'd have saved almost S30 00 
already! That along with articles on strategy and lactics and hints and all 
kinds of interesting information Plus, you mighl have made some new 
friends Yearly subscription USA and Canada $15.00. Overseas S 18.00. 



ARK ROYAL GAMES 

P.O. Box 14806 

Jacksonville, FL 32238 

(904) 786-8603 



Florida residenls add 5% COD's in USA only, add roughly S3 00 Sorry, no bankcards 
All orders shipped wilhm 24 hours except holidays and weekends Wnle lor free 
calalog CoCo I. II. Ill reter lo Ihe TandyW Color Compuler 




Unbeatable Prices from Howard Medical Computer 
Star NX-10 Printer Only $238 



disk NEW FROM J&M 

CONTROLLER 

The DC-4 is a scaled-down version of the popular DC-2 
without a parallel port. It includes a switch with 2 ROM 
sockets, JDOS. manual and such features as gold connec- 
tors and metal box. It accesses double sided drives and ac- 
cepts RSDOS 1.1 for Radio Shack compatability. 

DC-4 

(S2 shipping) 

RS DOS ROM CHIP 

ROM chip fits inside disk controller. 24 pin fits both J&M 
and RS controller Release 1.1. For CoCo 3 Compatability. 



$20 



each 



Reg. S40 
($2 shipping) 



DISK DRIVE SPECIALS 



U ll I V C V T Howards Drive gives you a 

DO-3 MPI drive, a CA-1 cable and a J&M DC-4 Disk Controller 
for only. Add $34 for a Dislo DC-3 replacement. ($s shipping) 

DOUBLE SIDED 
DOUBLE DENSITY 
360K 



$17845 



Separate Disk Drive Components 

DD-3 An MPI 52 double-sided, double density, 360K disk 
drive in a full height case and heavy-duty power supply. 



$98 



( s 5 shipping) 



DD-2 A TEAC 55B Vi height, double density, 360K disk 
drive in a Va height case and heavy-duty power supply. 



$188 



( s 2 shipping) 



55B TEAC bare drive, Va height, double-sided, double 
density with all mounting hardware fits R.S. 501. 



$118 



( s 3 shipping) 



BOTEK 

Serial to parallel converter converts the CoCo 4 pin serial output to run 
a parallel printer like Star or Epson. Includes all cables. Add $10 lor 
modem attachment. (S2 shipping) $gQ 45 



CA-1 Cable that connects the disk controller to the drive. 

CA2 $29 95 



$2495 

*" One Drive 



Two Drive 



GUARANTEE — Howard Medicals 30-day guarantee 
is meant to eliminate the uncertainty of dealing with a com- 
pany through the mail. Once you receive our hardware, try 
it out, test it for compatibility. If you're not happy with it for 
any reason, return it in 30 days and we'll give you your 
money back (less shipping). 



Incredible Savings on Printers! 



EPSON 



LX-86 
FX-86E 
FX-286E 
EX-800 



SALE 
PRICE 

SALE 
PRICE 

SALE 
PRICE 

SALE 
PRICE 



S238 
$439 
S603 
$503 



EX-10000 
LQ-800 
LQ-1000 
LQ-2500 



£££ $692 

PRICE $553 

33c! $792 

p s r a ,ce $1246 



Star NX-10 Only $238 



WORD PACK RS 

This ROM pack is the hardware answer for an 80 column 
display. It includes a built-in video controller to drive a 
monochrome monitor like our 123A. To get started, you need 
OS-9 2.0, a Y-cable or multipack interface drive 0, and a 
monochrome monitor. 



$89 



<S2 shipping) 



New basic driver runs word pack without 
need for an OS-9. 



$10 



Smith Corona XE 6100 

The Smith Corona 6100 is state of the art for today's 
typewriters. It operates as a standard typewriter or it con- 
nects to the color computer via a serial/parallel convenor 
box. The Smith Corona has a 50,000 word dictionary that 
signals everytime you misspell a word. Then with a one key 
corrector — lifts off the word so it can be retyped correctly. 
The 6100 comes with all the standard selection features like 
auto indent, underline, repeat key, centering and carries a 
90 day warranty on parts and labor. 

Reg. S449 (S7 shipping) 

Messenger Module connects the Smith Corona, XE 6100 
& 6000, SE 2000, SD 3000, and XD 7000 & 8000 to the color 
computer or Tandy 1000/IBMP.C. 



598 



Lets the graphic capabilities 
of your CoCo EXPLODE 



COCO $7Q 45 
MAX II ^*»- 

Y CABLE $19- 45 

MAX ^ &*■ g?% Three sets include 72 different 

FONTS ^3%S fonts ,or typesetting 

COLORING $15 
BOOK™ 



Needed to connect CoCo 
Max and disk drive at same 
time. 



Twenty-two pictures of clip-art 
by Glenside Color Computer Club 



(S2 shipping for each product) 



Howard Medical Computers 1690 N. Elston Chicago, IL 60622 




ORDERS 



(800) 443-1444 



INQUIRIES AND ORDER STATUS 

(312) 278-1440 



Showroom Hours: 
11:00- 5:00 Mon. - fri. 
10:00 - 1:00 Sat. 



WE ACCEPT: VISA • MASTERCARD • AMERICAN EXPRESS 

mn OR PHFrK^ • ^rnnni pn'Q Shipping charges are for 48 states. 

O.U.U UH UHbOKb bGHUUL KU.b APO and Canada order slightly higher. 




The Biggest 

The Best 

The indispensable 



The 




COMPUTER MONTHLY MAGAZINE 



THE RAINBOW is the biggest, best, brightest and 
most comprehensive publication a happy CoCo 
ever had! THE RAINBOW features more programs, 
more information and more in-depth treatment of 
the Tandy Color Computer than any other source. 

A monthly issue contains more than 200 pages 
and up to two dozen programs, 14 regular columns 
and as many as 20 product reviews. And advertise- 
ments: THE RAINBOW is known as the medium for 
advertisers — which means every month it has a 
wealth of information unavailable anywhere else 
about new products! Hundreds of programs are 
advertised in its pages each month. 

Every single issue of THE RAINBOW covers the 
wide spectrum of interests in the Tandy Color 
Computer — from beginners' tutorials and arcade 
games to telecommunications and business and 
finance programs. Helpful utilities and do-it- 
yourself hardware projects make it easy and fun to 
expand your CoCo's capabilities. And, monthly 
reviews by independent reader reviewers take the 
guesswork out of buying new software and hard- 
ware products. 

Join the tens of thousands who have found THE 
RAINBOW to be an absolute necessity for their 
CoCo. With all this going for it, is it surprising that 
more than 90 percent of THE RAINBOW subscrib- 
ers renew their subscriptions? We're willing to bet 
that, a year from now, you'll be doing the same. 
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Rainbow On Tape 

& Rainbow On Disk! 



— great ways to bring THE RAINBOW into your life. 
Each month, all you do is pop the tape into your 
cassette player or the disk into your drive. No more 
lost weekends. As soon as you read an article about 
a program in THE RAINBOW, it's ready to load and 
run. No work. No wait. 

Just think how your software library will grow. 
With your first year's subscription, you'll get almost 
250 new programs: games, utilities, business 
programs, home applications. And, with RAINBOW 
ON DISK, you'll also get all the OS-9 programs. 

RAINBOW ON TAPE and RAINBOW ON DISK — 
they're the "meat" of THE RAINBOW at a price that's 
"small potatoes." And now you even have a choice 
about how it should be served up to you. 

To get your first heaping helping, just fill out and 
return the attached reply card. No postage neces- 
sary. 



Q 
DC 

3 

Q. 
LU 
DC 

CO 
CO 
LU 



CO 2 

co S 




iiqo 

H Q. Q. 






« > o n o >> 

<■» — -- Q. 

I 
CD 
CO 



IT 

m 

.3 



2 
c 
3 

CD 



O 

co 



m 

X 

T3 



o 

3 

a 

a 

CD 



"0 
0) 

•< 

3 

CD 

3 

m 

3 
o 

O 
CO 

(D 

a 



CO 3 

° 3 

Q. (A 



CO 

o 

S CO 

a 3 S 

„ "a 

> CD 

3. O 
o " 
n> 

3 



a 

CD 



m 

X 

•o 

CD 
CO 
0) 



CD 



N 



*^ 
m en 
Sf 

3 

CD 

c 

D 3- 

3D » 

5 * 



-^ N5 

0) _. 

r» en 

D? "> 

o £ 

-r CD 
J CO 

5 H 

X 
m 

31 

> 



o 

o 



-j? o 

° ' S 3 - 
4 to a . o 

CL-. -0) 

aco g J 

01 -. ? 



-, - o " 

CO CO X CD 



s 

*< CD ,*" 

~ CO ID — ,. 

< ="< to 

m CD CD < 
CO CD 



CO 

5' o 

?z 

„ 3 

O CD 

P H 

c? S 

o a 
•<■< 

I? 
|o 

CO O 

3 O 

°-3 

>< T5 

O C 

5 CD 

c?H 
OI 

o m 

» 33 

§£ 

-1 CD 

co O 



C CO 
CT (O 

S3 
n> to 

o° 



■ 0) 
O 



O 

o 
a. 



6 
co 

CO 

3 
w 

IS 

3, 

cV 

CD 
CO 

CO 

3 

a 
5" 
o 
3 
S 
o 

3 
CO 
CT 
O 

C 



</> 

<T> 

3 

a 

<T> 

3D 

fi) 

3 

o 

2 

0) 

(Q 

0) 

N 

3 
CD 



CD 



w 



^CD C^ 

« — » B 

H co o o 

w </*2- S 



o 



— 3 o 



?ro 



Q. 
O 

3 

=3 
O 

CD 

D- 

o 

Si 

o 

o 

CO 



• CO 



CO 0j Q. 

■2.3.-*' 
P, 9 S 
co o_ 

CD CD 



CD 

Q. 

O 

3 

o 



s 

:±2- O -, 
O • ^ Q. 
S C/)[D Dl 
™ c 33 

cr q, • Q. 

5- CD - 1 3 

, -. 0) ID 



Q. 

o 



CO 

c 
o 



05 

co 

CD 

o 

0) 



CO- 
CO 

CO 



3" CO 
CD CD 

-1 



CD CD 

3 

~ w CD 
CO -60 Q. 

co en rn 

c 03 Yi 

CD _. 05 

-n <— CD 

«*°£ 

05 T-O 
CO 05 

CD >3 
05 -i' 05 

= 3 9- 

g 05 05 

§ =: 3 



2 3 
3' m 

r* X 

3"° 

1— CD 
C co 

3 CO 



^ _. o 

IV) CO c 

co co 3 

I O 05 

[\0 Ji. 05 
^J 3 

O _. 

co -a 

" 3" 
CO o 

0) 3 



3!!. 

^° 

T3 -i 

— 3 
o • 

SO 

CD C 



(0 

CD 
O 

c 

00 



c 
3 

CD 



3 

05 

c 

CD 



O 

05 



m 

X 

■o 



o 

3 

D 

a 

CD 



> 

n 
o 

o 

c 

3 

2 
c 

3 
cr 
CD 



O 

3" 
0) 
-1 
CO 
CD 



□ 
< 

CO 

> 



□ o 



05 



O 

05 



□ 

> 

3 

CD 
^ # 

o" 

05 

3 

m 

X 

-1 

CO 

co 
co 



CO 

•< 

3 

CD 

3 

m 

3 
o 

o 

CO 
CD 

a 



□ CT 



■o 

05 

■< 

3 

CD 

3 
»-•■ 

3 
c 

CO 

05 
O 
O 
O 

3 

T3 
05 

3 
>< 

o 
a. 

CD 



> 

Q. 

a 

S 

CO 
CO 



CO 

I 

CD 



N 



D 



? 



5 

05 



a 

CO 

5' 
co 

Co 
CO 

c 

CD 

CD 
O 

o 

00 

"«; 

CD 
0) 



3> CO 
5 co- 



CD 

O 

o 
2 



S"S5 

OS •>; * 
015 ^ 

co' qT CD 

g&o 

CD CD 5 

^" O- O 
CD > 

<o <■ 
3-D 
2.55 
a ;*; 

<o 



3- 
CD 

O 

o 

o 
o- 

CD 



3 

CD 

C 



n 

5 



□ □ 



3) 

m 

m 



05 
O 

3- 

5r 

o- 

CD 



MB* 



O 

C 



3 

(Q 

CD 

35 

> 

o 

7T 



H 3 3D 

S 03 £ 

"^CO Z 

» CO CO 

£ N O 

s = * 

3o? 



05 •-; 05 — 

f-Wof 

cnc_- ct -• 

^ 5^ o. 

n 9 c 

CO 3 -< Q) 

^-Oo - 

CD 05 O JJ' 
CO 3 C w 

* S & 1 8 

r,, CO O 






gc 



^s §•§■ " 

3 < 5 =- = 

O M CO 31 7 1 
O *f> 3 > O 

3 8 tt g§ 

-1 f- Z — ! 

3 co 5 o 

C- 05 3 3 
3 = d> CO 

, s a s p 

l CO CD oj ^ 
M O ■< O 
CD O CD CJ1 

s § » ? 

2S5"P 

' <D _ _ 

, co c£ m 



CO . CO 

•O CO Q- 

CD 

CO ■£« 05 

CO -J. 3 

CD -t^ Q. 



OI 

C 
CO 



(D 



CO 



H 

3=0 



3 8. a 



CD 
Q. 



O 

05 
3 
05 
Q. 
05 
05 
3 
Q. 



CO 

o 



COo 

cd a 

co o 

•cyj Q. 

CD CD 



?§ 
co^- 



go 



CD 


WW 


O 


O 


3 


3 


O 

Z 


C 

3 


H 
> 


<T> 


■0 


■_. 


m 


(/) 





SL 




to 


3D 





><J 


z 






03 


Q. 


O 


-* 


3 


O 



o O 

— *^ 
55 (o 



280 X$=INKEY$:GOSUB270:SH=H:SV=V 

: CIRCLE (H,V) ,5 

290 LINE (20, 145) -(240, 180) ,PRESE 

T , BF : DRAWBM2 6 , 150 " : A$="MOVE CUR 

SOR TO DESTINATION" :GOSUB590:DRA 

W"BM52,160":A$="POINT AND HIT EN 

TER. ":GOSUB590:A$="BM=M; ,=N;":C$ 

= " NUN DNRNLNENFNGNH 

300 IFXY=0THENH=H+F:V=V+G:DRAW"B 

M=H;,=V;"+C$:GOTO320 

310 M=H:N=V:H=H+F*5:V=V+G*5:MN=F 

*3+G+4 : B$=D$ (MN) : DRAW"XA$ ;XB$ ; XA 

$ ;UXB$ ; XA$ ; LXB$ ; XA$ ; DXB$ ; XA$ ; RXB 

$;" 

3 20 F=0:G=0:GOSUB510 

330 IF Y>58THEN G=l 

340 IF Y<5THEN G=-l 

3 50 IF X>58THEN F=l 

3 60 IF X<5THEN F=-l 

370 IF PEEK(338)=191 

380 IF PEEK(344)=253 

390 IF PEEK(339)=251 

ST-40:END 

400 

410 

420 

430 

440 



THEN 450 
THEN RUN 
THEN CLS:LI 



IF H>2 45 THEN F=-l 
IF H<10 THEN F=l 
IF V>131 THEN G=-l 
IF V<10 THEN G=l 
GOTO 300 



450 CIRCLE (H,V) , 5 :HD=ABS (SH-H) :V 

D=ABS(SV-V) 

460 D=SQR( (HD A 2)+(VD A 2) ) :D=INT(D 

*18.75) 

470 D$=STR$(D) : IF D>999 THEN D$= 

LEFT$(D$,LEN(D$)-3)+","+RIGHT$(D 

$,3) 

480 GOSUB600:A$="THE DISTANCE BE 

TWEEN THE TWO" : GOSUB590 : DRAW"BM5 

0,160":A$="POINTS IS"+D$+" MILES 

. " : GOSUB590 : FORX=1TO2000 : NEXT : GO 

SUB600:A$="HIT SPACEBAR TO TRY A 

NOTHER":GOSUB590 

490 IFINKEY$OCHR$(32)THEN490 

500 HD=0:VD=0:GOTO60 

510 X=JOYSTK(0) :Y=JOYSTK(l) :XY=0 

520 IF PEEK (341) =2 47 THEN Y=0 

530 IF PEEK(342)=247 THEN Y=63 

540 IF PEEK(343)=247 THEN X=0 

550 IF PEEK(344)=247 THEN X=63 

560 IF PEEK (339) =191 THEN XY=1 

570 IF PEEK(65280)=126 OR PEEK(6 

5280) =254 THEN XY=1 

580 RETURN 

590 FORX=lTOLEN(A$) : Y=ASC (MID$ (A 

$,X,1) ) :DRAWA$(Y) :NEXT:RETURN 

600 LINE(20,145)-(240,180) ,PRESE 

T, BF: DRAW "BM2 6, 150": RETURN ^ 




«~ f» r* •"% o i~ c c (Z C »""• O ! <C C 




DISH DRIVES 

NEW-J DRIVE SYSTEM <£ DSDD DRIVES ACCESSED 

UNDER R3 D0S)*-J4£9.9E 
£ DRIVE SYSTEM 9K8 DSDD DRIVES IN ONE CASE) 

J3£9.9S 

DRIVE 1 UPGRADE <1 DSDD UPGRADE FOR YOUR 

£6-Sl£9.3131, OR 313£-J119.95 PLEASE 

SPECIFY CATALOG NUMBER WHEN ORDERING ! ! 

DRIVE 0-SSDDF-H DRIVE X-S199.9B 

DRIVE 1-SSDD F/H DRIVE (USE (HI/EXISTING DRO) 

I1S5.9B 

X- INCLUDES EITHER R.S. OR DISTO CONTROLLER 



CDCD 3 
S1£K UPGRADE-J103.3E. TECH MANUAL-*£9.3S 
RAM DISK * DIAGNOSTICS -119.95. 
MONITOR CONNECTOR FOR CM-6 -14.95 

DTHER STUFF 

COCO GRAPHICS DESIGNER-1£9.9S- AD0S-1£9.95 
MONITOR INTERFACE -»£9.9S 
KEYB0ARDS-1E4.95 ADAPTERS-19.95 
SERIAL TO PARALLEL CONVERTERS -iAA. 95 



FULL LINE OF 



PRINTERS IN STOCK • ! ! 



CALL FOR BEST PRICES ttl 



ins Saoqpifiif ®aoMF 

5512 POPLAR MEMPHIS, TN 33119 901-761-4565 

ADD 14.90 FOR SHIPPING AND HANDLING. VISA.MC & MONEY ORDERS ACCEPTED. 
ALLOW 3 WEEKS FOR PERSONAL CHECKS, NO CODS. PRICES MAY CHANGE WITHOUT NOTICE 



May 1987 THE RAINBOW 35 



PRINTER UTILITY 




W 



eOSV 



.\o-ose 



screen 



dump 



tot 



w ndVP^ e ' S 




Graphics Generator is a utility that takes portions of 
the Hi-Res PM0DE4 screen and generates a program 
that when run. reproduces the image, bit-for-bit, on 
any Tandy-compatible printer with seven pins and a dot- 
addressable graphics mode. 

After you have loaded and run Graphics Generator, it 
prompts for the filename of a PM0DE4 picture to load from 
the disk. Pressing ENTER brings up a sorted directory. 
Pressing any key while in directory mode displays more 
listings and then returns you to the filename prompt. 

After selecting a filename, it is loaded and the display 
screen prompt appears. This also appears if you press ENTER 
at the filename prompt. Pressing Y displays the current 
picture in memory. Pressing any key during the viewing 
returns you to the filename prompt. 

After selecting N from the display screen prompt, the 
picture is displayed with a small blinking cursor. Make a 
box around the object to be converted using the right 
joystick to move the cursor to the upper-right corner of the 
box you are going to make. Press the joystick firebutton 
until a click is heard. Now, as the joystick is moved, a box 
will stretch across the screen. Move the cursor so that you 
have made the box big enough to fit the entire object, but 
not too much larger, because processing time during 
conversion will increase. When your object is enclosed, 
press the button again. You are now prompted for the 
filename to be used for the generated file. Be sure to include 
an extension of .BflS when saving, otherwise the computer 
will assign .DAT. 

Allen Snook lives in Oxon Hill. Maryland, and has 
been a Co Co enthusiast for nearly four years. He 
enjoys graphics, sound and Simulation programs, and 
he is coordinator of a users group. 



By Allen Snook 



In a few minutes (the bigger the box, the longer it takes), 
the computer will finish its save of the reconstruction 
program. Pressing any key at this point ends the program. 

Be sure to keep a disk in the drive while Graphics 
Generator is being used! 

(Please direct questions about this program to the author 
at 5203 Wheeler Road, Oxon Hill. MD 20745, 301-894- 
6969. Please enclose an SASE for a reply when writ- 
ing.) □ 




The listing: GRAPHGEN 



10 
20 
30 
40 
50 



CLEAR200J3 
PCLEAR8 

FORZ=0TO6 : Z ( Z ) =INT ( 2 A Z ) : NEXTZ 

'INITIALIZE [3j3-9j3] 

T$="%%%%%%%%%%%%%%%%%%%%%%%%% 

% PRINTER GRAPHICS % 

PROGRAM GENERATOR % 



% 



BY 
ALLEN SNOOK 



% 



I! 

60 CLS: PRINT" ";T$ 
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70 PRINT@416, "":PRINT@416, "FILEN 


490 PRINT@416,"SAVE OF GRAPHIC P 


AME/EXT:"; : LINEINPUTF$ : IF F$<>"" 


ROGRAM DONE.":EXEC44539:END 


AND P$0»D" THENLOADM""+F$ 


500 REM I/O 


80 IF F$="D" THEN 630 


510 PRINT@416, "STORE FILE AS:";: 


90 PRINT@416, "DISPLAY SCREEN? (Y 


LINEINPUTF$ 


/N)» 


520 IF F$="" THEN 510 


100 EXEC44539 : IFINKEY$="Y"THENPM 


530 PRINT§416, "PROCESSING ";F$;" 


0DE4 , 1 : SCREEN1 , 1 : EXEC4 4 539: G0T07 


, WAIT":PRINT@448,"" 





540 OPEN"0" ,#1,F$ 


110 F0RX=1T04 : PCOPYX TO X+4:NEXT 

X 

120 'GET BOX [100-210] 


550 PRINT#1,"10 PRINT#-2,CHR$(18 


) 

560 PRINT#1,"20 READN:IF N=888 T 


130 PMODE4 , 1 : SCREEN1 , 1 


HEN 90" 


140 A=JOYSTK(0) *4:B=JOYSTK(l) *3 


570 PRINT#1,"30 IF N=999 THEN 80 


150 I=PPOINT(A,B) :PSET(A,B,ABS(I 


it 


-5)) 


580 PRINT#1,"40 PRINT#-2,CHR$(12 


160 R=PEEK(65280) : IF R=254 OR R= 


8+N) ; :GOTO20" 


12 6 THEN SOUND200, 1:GOTO180 


590 PRINT#1,"80 PRINT#-2:GOTO20" 


170 PSET(A,B,I) :GOTO140 


600 PRINT#1,"90 PRINT#-2,CHR$(30 


180 PSET(A,B,I) 


) 


190 C=JOYSTK(0)*4:D=JOYSTK(1) *3 


610 PRINT#1,"95 END" 


200 LINE(A,B)-(C,D) ,PSET,B 


620 RETURN 


210 LINE(A,B)-(C,D) , PRESET, B 


630 'LIST DIRECTORY 


220 FORX=8T05STEP-l: PCOPYX TO X- 


640 DIM NA$(50) 


4 : NEXTX 


650 GOSUB7 30 


230 R=PEEK(65280) : IF R=254 OR R= 


660 FORX=l TO N STEP 22:CLS 


12 6 THEN SOUND200,1:GOTO2 60 


670 FORX2=X TO X+21 


240 GOTO 190 


680 PRINTNA$(X2) , 


250 'PROGRAM [450-570] 


690 NEXT X2 


260 GOSUB500 


700 PRINT@416, "DIRECTORY: PRESS A 


270 'SAVE DATA [230-430] 


NY KEY":EXEC44539 


280 LN=90 


710 NEXTX 


290 FOR Y= B TO D STEP 7 


720 RUN 


300 N=l 


730 'DIRECTORY READ 


310 FOR X= A TO C 


740 N=l 


320 Z=-1:E=0 


750 FORA=3 TO 11 


3 30 FORY2= Y TO Y+6 


760 DSKI$ 0,17,A,A$(0) ,A$(1) 


340 Z=Z+1 


770 FORJ=0 TO 1 


350 IF PPOINT(X,Y2)=0 THEN E=INT 


780 FORI=0 TO 9 6 STEP 3 2 


(E+Z(Z)) 


790 EN$=MID$(A$ (J) ,1+1,32) 


3 60 NEXT Y2 


800 IF ASC(MID$(EN$,1,1) ) =0 THEN 


370 IF LEN(C$(N) )>230 THEN N=N+1 


840 


380 C$(N)=C$(N)+RIGHT$(STR$(E) ,L 


810 IF ASC(MID$(EN$,1,1) )=255 TH 


EN(STR$(E) )-l)+"," 


EN 850 


3 90 NEXTX 


820 NA$ (N) =LEFT$ (EN$ , 8) +"/"+MID$ 


400 FORQ=lTON 


(EN$,9,3) 


410 LN=LN+10 


830 N=N+1 


420 C$(Q)=STR$(LN)+" DATA "+C$(Q 


840 NEXT I, J, A 


) 


850 N=N-1 


430 IF Q=N THEN C$ (Q) =C$ (Q) +"999 


8 60 FORX=N TO 1 STEP -1 


" ELSE C$(Q)=LEFT$(C$(Q) ,LEN(C$( 


870 FORY=l TO X-l 


Q))-l) 


880 IF NA$(Y)>NA$(Y+1) THEN B$=N 


440 PRINT#1,C$(Q) :C$(Q)="":NEXTQ 


A$(Y) :NA$(Y)=NA$(Y+1) :NA$(Y+1)=B 


450 NEXTY 


$:F=1 


460 C$=STR$(LN+10)+" DATA 888" 


890 NEXTY 


470 PRINT#1,C$ 


900 IF FO0 THEN F=0 : NEXTX 


480 CLOSE#l 


910 RETURN 
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WISHING WELL 



Graphics, Education and 
Speech Come Together 

By Fred B. Scerbo 
Rainbow Contributing Editor 



Editor's Note: If you have an idea for 
the " Wishing Well, " submit it to Fred 
c/o THE RAINBOW. Remember, keep 
your ideas specific, and don't forget that 
this is BASIC. All programs resulting 
from your wishes are for your use, but 
remain the property of the author. 



This month's "Wishing Well" 
brings us back to some fairly 
advanced programming tech- 
niques. It also marks the start of a new 
series of programs much like our Life 
Skills series. (Don't worry, there will 
still be more in that series. Thanks to all 
of you who have written about that 
series, like second grade teacher Alice 
Shirley of Natrona Heights, Pennsylva- 
nia.) 

This series is called Knowing Your 
Body and will combine some of the 
advanced BASIC graphics we have ex- 
plored in these pages with an added 
bonus of synthesized speech with Radio 
Shack's Speech Pak. Since recent re- 
quests have centered on all three of 
these fields (graphics, education and 
speech), we will try to cover all three 
with this newest program and concept. 
Forgive me, then, if this column is a 
little shorter than usual. When you see 
the length of the listing, you will under- 
stand why. 

Fred Scerbo is a special needs instructor 
for the North Adams Public Schools in 
North Adams, Massachusetts. He holds 
a master's in education and has pub- 
lished some of the first software avail- 
able for the Color Computer through 
his software firm, Illustrated Memory 
Banks. 
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The Inspiration 

I don't know how many of you feel 
about the numerous graphics Adven- 
ture games that have been available for 
the CoCo over the last few years, but I 
have been extremely impressed with 
them. 1 am not a big Adventure fan, but 
I do feel that having highly detailed 
graphics accompany an Adventure 
game is really what computer games 
should be about. What is usually very 
nice about these games is that the 
picture just explodes onto the screen 
without the user having to sit through 
the drawing process. 

Sometimes, watching the drawing 
process can be fun, especially if it is in 
the context of something like Baseball 
Fever, Football Fever or Rockfesi, 
typed in by the user (which have ap- 
peared in previous "Wishing Well" 
pages). However, I have seen some 
BASIC graphics Adventures that are 
absolutely a pain to sit through while 
the screen creates the graphics. Some- 
how, the whole effect and purpose of the 
graphics are destroyed if you see them 
constructed. For this reason, all of the 
machine language graphics games have 
constructed their graphics out of the 
user's view. 

The same applies to graphics used in 
an educational program. Some pro- 
grammers have drawn a pumping heart 
for science instruction, but the drawing 
process really detracted from the simu- 
lation. Right now I'm working on one 
such simulation that I hope will knock 
your socks off. 

For the time being, however, we will 
concentrate on this program. It com- 
bines some of the graphics effects used 
in graphics Adventures with a talking 
educational bent to it. 



The Program 

The first program in the series is How 
Your Blood Works. Unlike other 
graphics programs that use the artifact 
colors in PM0DE4, this program uses the 
same techniques, only in PP10DE2. If you 
check the listing, you will find the poke 
commands that allow you to get these 
colors in the combined PM0DE2-' 
PM0DE1. 

There are several reasons 1 chose this 
method. I, for one, do not believe there 
is much difference between the graphics 
resolution of these two modes. Since we 
are actually using the PNDDE3 memory 
map when we get the artifact colors in 
Pf10DE4, each pixel of color is two 
pixels, forming a rectangular dot. 
PH0DE2''l will use four pixels for one 
color dot, but the dot will be a square, 
not a rectangle. For my money, I feel 
you can get better graphics using 
squares than rectangles. 

The second reason for using PM0DE2'' 
1 is it uses half as much memory as 
PM0DE4/3. This allows us to PCLEAR8 
and have extra graphics pages hidden 
out of sight to do our drawing on. The 
third reason is these lower resolution 
graphics modes are twice as fast as 
PM0DE4-'3. Since we are operating in 
basic, every drop of speed helps. 

Next, I had to construct a new graph- 
ics character set, since our text charac- 
ters are useless in this type of program. 
To accommodate the lower resolution 
of PM0DE2/1, these new graphics char- 
acters will occupy only 2 1 characters per 
line. This is no problem, however, since 
it is more helpful for educational pur- 
poses to have larger text. This is the type 
of program you might want to use with 
a group rather than an individual. All 
of our text is in uppercase lettering. We 



SPEECH SYSTEMS 
SUPER SALE 



APRIL 20 to MAI/ 30 





FOR \IOUR COCO 1, 2, 3 

LIST SALE SAVE 

SUPER VOICE $ 79.95 $ 59.95 $20 

EARS 99.95 79.95 20 

SYMPHONY 12 79.95 59.95 20 

LYRA 54.95 44.95 10 

COCO MIDI 2 149.95 119.95 30 

PROTOTYPE BOARD & CASE 29.95 14.95 15 

STEREO PAK 39.95 29.95 10 

TRIPLE Y-CABLE 34.95 29.95 5 

DOUBLE Y-CABLE 28.95 23.95 5 

MUSICA 2 29.95 24.95 5 

MUSICA LIBRARY (100-900) 29.95 24.95 5 

LYRA LIBRARY 39.95 29.95 10 

-^— ^— EKCLUSWELy COCO 3 —^^ 

512K TURBO RAM 149.95 99.95 50 

51 2K TURBO RAM w/o CHIPS 69.95 49.95 20 

MAGIC OF ZANTH 34.95 29.95 5 

RETURN OF JUNIOR'S REVENGE .... 34.95 29.95 5 




TURBO RAM 



TM $3*9^5 
$119.95 



TURBO CHARGE YOUR COCO 3 



f 512K I .isl High Quality Memory. 

f Super Easy Solclerless Installation. Installs in minutes, 

** Assembled, tested, and burned-in. 

is 120 ns RAM Chips 

W I |jgh Quality Double Sided, Solder Masked. Silksi teened I'C Hoard. 

^ Ideal tor OS9 Level II 

h J Year Warranty. 

rV Free GIME Chip Technical Specs ($10.(10 without turbo Kami. 

* Free 5I2K Ram Test Program (Slo.00 withoul Turbo Kami. 

i^ I ree MUSICA RAM Disk ($10.00 withoul lurho Kami. 

is $5 OFF TURBO KAM Disk. 

i-* \l-o available. TURBO RAM less memory I hfpS 5f>9.95 




'~^y-"" r °« Ul 




INSTALLATION 

li you know how to hold a screwdriver, we're convinced you can 
install Turbo Ram in minutes, However, ii you like, send us youi 
C( >< ( ) l insured, postage paid, and we will install it, pay (lie return 
postage and guarantee ii for I year $15. no 



SATISFACTION GUARANTEED 

II lor any reason you wish to return Turbo Kani, you may do so 
within IS days and be charged only a 111",, restocking charge. You 
may keep the GIME CHIP Technical Specs, SI2K Ram TeSI program 
and MUSICA KAM DISK, a $.10 value. 



TURBO RAM DISK 



TURBO RAM DISK adds .! lightning last Kam Disks to yourCOt ( ) system. 
Imagine saying and loading programs instantaneously and having hundreds 
01 your programs "on line" loi last access. Single disk system users can 



use rURBO RAM DISK to easily make backups without continuously 
5Vi Hi lung disk-.. 

Requires 512K rurbo Charged COCO 3 524.95 

when purchased with turbo ram $19.95 



COCO 3 128K 



COLOR CONNECTION IV 

This is the most comprehensive modem package for the coki 1. All 
standard protocols are supported including CompuServe's Protocol B, 
XMODEM protocol, and XON/XOFF. Full support of the auto answei auto 
dial feature for both Hayes compatible and some Radio Shark modems is 
provided. Single key macros allow easy entry ol often-used passu cuds and 
IDs with a single key stroke. 
Disk $49.95 

COLOR SCRIBE III 

This great Word Proi essoi can take lull advantage of the B0 < olumn'display 
of the COCO 5. lusiiiication, Headers. Foolers, and Pagination make il 
perfect for letters and documents as well as programming in BASIC, PAS- 
CAL, "C," and Assembly Language. Over 20 line editing commands include 
capabilities like character insert and delete, skip oyer words, breaking a 
line, and mine' 
Disk $49.95 



THE MAGIC OF ZANTH 

In the land 01 /anlh. magii is commonplace. Dragons, Griffins, Centaurs 
and Demons abound. You are sent on a quest to discover the source of 
magii in the Land of Zanth. This intriguing adventure features ovei -' 
dozen hl-res 16 color animated graphic screens, 4 voice musk and sound 
effects. I In- In color, till* 192 graphics look great. 
Disk $34.95 

RETURN OF JUNIOR'S REVENGE 

This is the same lunior you've seen in the Kong arcade series. Inn with 
new C< ICO 3 graphics, iliis tireless little monkey must overcome all sorts 

Hi obstacles '4 si ns worth) lo rescue his father, The king from the 

mean zookeeper. He will traverse the jungle and swamp, climb vines, 

avoid 1 hompers and birds, open locks, and more betoce l\e finally meets 
with his big daddy. The Id color, 320 x I'l-' graphics are superb. 
Disk $34.95 



We* ,,■!," \SH CHECK COD VISA and MASTER I \RI 

Shipping .in.! handling t's >ind ' .m.id. Si.00 

Shipping .Hid handling nuisirfc the? 1 IS .incl 1 .m.irl.i S3 LM1 

cod a sjii" 

III .r'Md.nK .hi,. 1 1. 1 . s.ilrs I.IX 
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38W255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 
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FILE EDIT HIDI HISC 



i^^ 



LEGEND 



B2 



5 



*-3 




OaiiBNizlN 

iatg 



3 




JJJJILLL^ 



C° M FF£P ! 



«* 



<J-^ x#A°^ ** 






G x 



o 




liWiW'tVViTI I 1 




',' 



I ' I III 



If you want to compose music, experiment, or STEREO AND MONO. Bv connecting SYM- PIANO KEYBOARD. For those wishing to turn 

just listen to music, LYRA is the tool you need. PHONY 12 to your home stereo system, music is SYMPHONY 12 into a real polyphonic synthe- 

LYRA represents the new state-of-the-art super produced in stereo, 6 voices from each channel. sizer we offer a full size 61 note piano 

user friendly software. Pull down menus and However, you don't need to have a stereo system, keyboard. 

icons make composing music as easy as pointing all 1 2 voices also come out of your TV or monitor. T users usi bojh SYMPHONY , 2 and |he 

w.th a joyshck or mouse and clicking. LYRA is SYMPHONY P is a sophisti- PIANO KEYBOARD will require a Y-CABLE. 

capable o. 8 individual y controlled voices. You S^nT-S^U^K !W 4^1 Disk systems require a Triple Y-CABLE or 

may take advantage ot the 8 voice power ot <-i»i.u »u»"u bcncunui. '< .vun.es aiiu -» noise . |||T| ' ^ 

LYRA using external MIDI synthesizers or SYM- E2"*?" 1 ? n " . y °" '"credible sound etfec. capa- ™" L '£™- 

PHONY 12. We believe tha, LYRA and SYM- b^We have included gun shot, explos.on. rac- JS^SIVonI 1 3mAN« ' 

PHONY 12 was a match made in heaven. For a ing car ana more. #LS177 $19 95 

limited «me ; when you purchase both, ,we_ will SYMPHONY 12. You get over a dozen music and PIANO KEYBOARD #PK 185' '.'.'.'.'.'. SU9.95 

include tree the _LYRA SYMPHONY 12 CONNEC- sound effec( selec|ions and comp | ele documen.a- DOUBLE Y-CABLE #DYI81 $28.95 

HON, a 519.95 value. tion So f, ware is shipped on Tape or Disk. TRIPLE Y-CABLE #TYI73 $34.95 

GUITAR CHORD BOOK 

This program, written by a guitar instructor of 17 years, displays in high Whether you are a beginning guitar student or an advanced player, you 

resolution graphics the exact fingering for over 100,000 chord comhina- will find this quick reference to guitar chords invaluable. 

tions. You may even tune your guitar to the computer and play along. 32K Disk only #GCI53 $29.95 

MUSIC THEORY 

COURSE 1 COURSE 2 

This course covers all the basics from music notation & duration, key A more advanced course that deals with: Major and Harmonic Minor 

signatures, tempo, to an introduction of the keyboard. This is an entry scales, interval spelling, Triad (Chord! theory, Inversions, Dominant 7th 

level course recommended as a prerequisite for Course 2. chords, and ear training of the intervals. 

32K Disk only. #MT101 $49.95 32K Disk only #MTI02 $49.95 




EARS 



Electronic 
Audio 
Recognition 
System 



$99.95 






• SPEECH 
RECOGNITION 

•HANDS OFF 
PROGRAMMING 

•HIGH 
QUALITY 
SPEECH 
REPRODUCTION 

EARS Does It All! 
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Two Years In the Making. Speech Systems 
was formed to develop new and innova- 
tive speech products. After 2 years of in- 
tensive Research and Development, we 
have created a truely sophisticated 
speech recognition device. Recognition 
rates from 95% to 98% are typical. Until 
now, such a product was outside the 
price range of the personnel computer 
market, and even small businesses. 

EARS is trained by your voice and capable 
of recognizing any word or phrase. 
Training EARS to your particular voice 
print takes seconds. Up to 64 voice prints 
may be loaded into memory. You may 
then save on tape or disk as many as you 
like so that your total vocabulary is virtu- 
ally infinite. 

Speech and Sound Recognition. EARS is re- 
ally a sound recognition system, so it re- 
ally doesn't matter whether you speak in 
English, Spanish, or French. In fact you do 
not have to speak at all, you can train 
EARS to understand sounds such as a 
musical note or a door slamming. 

Hands Off Programming. Imagine writing 
your own BASIC programs without ever 
touching the keyboard. Everything (hal 



you would normally do through a 
keyboard can now be done by just 
speaking. 

Programming EARS Is Easy. LISTEN, 
MATCH and other commands have been 
added to BASIC so that programming 
EARS is a piece of cake! The single BASIC 
line: 10 LISTEN: MATCH will instruct 
EARS to listen to you and return the 
matching phrase. 

It Talks. EARS is also capable of high qual- 
ity speech. We mean REALLY high quality. 
The speech is a fixed vocabulary spoken 
by a professional announcer. Speech 
Systems is currently creating a library of 
thousands of high quality words and 
phrases. For a demonstration call (312) 
879-6844, you won't believe your ears or 
our EARS. 

DISK OWNERS. EARS will work with any 
disk system with either a MULTI-PAK or 
Y-CABLE. Our new Triple Y-CABLE was 
specifically developed for those wishing 
lo add SUPER VOICE as a third device. 

You Get Everything You Need. You get ev- 
erything you need including a specially 
designed professional headset style noise 



cancelling microphone. The manual is 
easy to use and understand. Several 
demonstration examples are included so 
you don't have to write your own pro- 
grams unless you want to. EARS will work 
in any 32K or G4K Color Computer. 

SUPER VOICE $20 OFF 

Imagine talking to your computer and it 
talking back to you. When you need an 
unlimited vocabulary, you can't beat 
SUPER VOICE. For a limited time, we will 
give you the SUPER VOICE for $59.95 wilh 
your EARS purchase. Even if you already 
have another speech unit, here is your 
chance to buy the best and save $20. 

VOICE CONTROL 

Applications for EARS are astounding. 
Here is our first of many listening pro- 
grams to come. VOICE CONTROL is a 
program specifically designed to allow 
you to control any appliance in your 
house with your voice and our HOME 
COMMANDER (sold separately) or the 
Radio Shack Plug 'N' Power controller. 
For example, you can control your TV by 
saying "TV ON" or "TV OFF". . $24.95 




BLANK DISK 

OR TAPE 
WITH EVER* 

ORDER ^* 



VISA' 



W T ^ 


[MasterCard] 


V jl,...A 



Dealer Inquiries 
Invited 



>//< 



emd 



We accept CASH, CHECK, COD, VISA and MASTER CARD orders. 

Shipping and handling US and Canada $3.00 

Shipping and handling outside the US and Canada $5.00 

COD charge $ 2.00 

Illinois residents add b'/*% sales tax 



Speech ^>u5i< 

38W255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 (TO ORDER) 



CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL 



'SUPER VOICE' 



COCO'S MOST ADVANCED 
SPEECH SYNTHESIZER. 

IT TALKS, SINGS AND 

MORE. 

only . . . $79.95 

WITH EARS PURCHASE 
only . . . $59.95 
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SUPER VOICE is no ordinary speech synthesizer. It uses Silicon 
Systems. Inc. SSI-263. the most advanced speech/sound chip 
available. SUPER VOICE is not only capable ot highly intelligible 
speech, sound effects, and singing over a 6 octave range, but now 
we have turned SUPER VOICE into a monophonic Super Music 
Synthesizer with our PIANO KEYBOARD. 

IT TALKS. A free TRANSLATOR text-to-speech program makes 
writing your own talking program as easy as SAYING "HELLO." 

SUPER VOICE works in any 32K or 64K computer. A disk system 
requires a Y-Cable or Multi-Pak. 

Here are the facts; 
the decision is yours. 






SUPER VOICE 


REAL TALKER 


RS SPEECH 
CARTRIDGE 


VOICE-PAK 


Synthesiser Device 


SSI-263 


SCOT 


SP256 


SC 01 


Speaking Speeds 


16 


1 


1 


1 


Volume Levels 


16 


1 


1 


1 


Articulation Rales 


8 


1 


1 


1 


Vocal Trad 
Filler Settings 


255 


1 


1 


1 


Basic unit 
ol Speech 


64 phonemes 
4 durations each 


64 phonemes 


64 allophones 
5 pause lengths 


64 phonemes 


Pilch Variations 


4096 (32 absolute levels 
with B inlleclion speeds) 


4 


1 


4 



SUPER TALKING HEADS 

Paul and Pauline, our talking heads program is normally $24.95. Until 
Dec. 15 we will include them with each SUPER VOICE order. 
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We accept CASH. CHECK. COD, VISA and MASTER CARD orders. 

Shipping and handling US and Canada S3.00 

Shipping and handling outside the US and Canada $5.00 

COD charge $2.00 

Illinois residents add 6'A% sales tax 



Speech S^udtemd 

38W255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 (TO ORDER) 



1 MEGABYTE 
COLORAMA 

CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL OR BBS, 
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FILE EDIT MIDI HISC 



All Voices On 
' Tine Signature 
Key Signature 
Tenpo 
Reset block 
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LYRA is ihe most powerful music composition program we have seen on 
• any computer. We clon'l mean just the COCO, we really mean any com- 
puter. Whether you are a novice trying to learn music or a professional 
musician with MIDI equipment you will find LYRA a powerful tool. You 



see, we wrote LYRA for musicians that hate computers. It you want proof, 
purchase a LYRA demo for $7.95. We will apply the demo price to your 
purchase. MIDI output requires Ihe LYRA MIDI cable (#MCl58) or COCO 
MIDI Seq/Editor i#CM147i. 



V Ultra Easy to use. |ust point with joystick or 


c 


mouse and click 






W Compose with up to 8 completely 




independent voices. 




t» 


i-" Room tor over 18.000 noles. (This is nol a 




misprint!) 




t* 


^ Super Simple Editing 


Supports 


is 


Note insert 


Block insert 


^ 


Note delete 


Block delete 




Note change 


Block copy 


V 


i* Output music to 






TV Speaker 


Monitor Speaker 


w 


STEREO PAK 


ORCHESTRA 90 




SYMPHONY 12 


COCO MIDI S/E 


IS 


MIDI Synth 


MIDI Drum Machine 




f Oulpul up to 4 voices without adaitional 


V 


hardware 







Output all 8 voices using either SYMPHONY 

12 or one or more MIDI synthesizers and 

drum machines 

Output any voice on any ol Ihe 8 MIDI 

channels 

Transpose music to any key 

Modity music to any tempo 

Automatically inserts bar lor each measure 

as you compose 

Key signature lets you specify sharps and 

Hats only once. LYRA will do the rest. 

Plays MUSICA 2 files using LYRA CONVERT 

(#LCI(>4). 

Each voice may be visually highlighted or 

erased 

Each measure is numbered (or easy 

reading 



f Solo capability 

c Block edits are highlighted. 

t^ Tie notes together lor musical continuity. 

^ Name ol note pointed to is constantly 

displayed 
(^ Jump to any point in the score 

instantaneously, 
f* Memory remaining clearly displayed, 

however you will have plenty ol memory 

even lor Ihe most demanding piece. 
i* Help menu makes manual virtually 

unnecessary. 
\* LYRA is 100% software, no need lor exlra 

hardware unless you want more power. 

Music easily saved lo tape or disk 

Requires 64K and mouse or joystick. 



LYRA (Disk onlyl #LY122 



$54.95 



LYRA OPTIONS 



These LYRA options are 

LYRA CONVERT 

A program lo convert MUSICA 2 files to LYRA 

files. 

(Disk) #LCIfa4 $14.95 

VERSION UPDATE 

To receive the latest version of LYRA return your 
original disk. #UPlb2 $10.00 

LYRA MIDI CABLE 

A cable to connect your computer to your MIDI 

synthesizer. 

#MC158 $19.95 

Wp accept CASH. CHECK. COD. VISA and MASTER CARD orders 

Shipping .incl handling US and Canada 5.1 (HI 

Shipping and handling outside Ihe US and Canada S3 00 

COD Charge $2.00 

Illinois residents add 61 V sates '.i< 



not required. They are provided lor those wishing additional flexibility. 



LYRA SYMPHONY 12 ENHANCER 
Lets LYRA play all 8 voices through SYMPHONY 
12. 
(Disk) #LS177 $19.95 

LYRA LIBRARY 

A collection of 50 songs ready to play for hours. 
Most have 7 and 8 voices. #LLI37 . $39.95 

SYMPHONY 12 

A real hardware music synthesizer, lets LYRA 

play all 8 voices in stereo, 

(T or Dl #SYI49 $69.95 



COCO MID Seq/Editor 

A professional quality MIDI interface for MIDI 

synthesizers, 

(Disk only) #CM147 $149.95 

MUSIC LIBRARY 

A collection of over 900 songs. When used with 
CONVERT, it gives an incredible LYRA library. 
Each volume 100 songs. 
(T or D) #MLXXX $29.95 



COCO MAX is .i trademark <>i Coldrware 
orchestra 'in is ,i trademark ol Radm Shock 
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38W255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 
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HIDI 1 ns 1 runen 1 s : 

[_|0:[!]01 Brass 1:005 String 

2! 006 Piano 3:009 Guitar 

|y 4:013 E Organ 5:014 P Organ B 

6:003 Trunpet 7:016 Flute 

£ 8=018 Oboe 9:019 Clarnet 

2 A= 021 Vibrphn B: 026 Harpsch 

C: 025 Clavier D: 032 Tinpani 

E: 043 Snaredr F: 045 Percusn 
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U- xs'.'ioui usezs zetutn 
original disk with Szo. 



Now your COCO tan talk to your MIDI music synthesizer. 
Whether you have a Korg, Roland, Casio, Yamaha, or Moog, it 
doesn't matter as long as it's MIDI equipped. Choose from our 



entry level MUSICA MIDI system that plays MUSICA files or our 
Professional COCO MIDI 2 system. 



!•" Supports 16 Track recording and playback 

v - Ad|uslable tempo 

v Over 45 Kbytes available 

(Over 15.500 MIDI events possible) 

v Record to any track 

* Low Level track editing 

*•* LYRA editing (one voice per Irack) 

i-* Playback from any number of tracks. 

k* Quantizing to Vis, %?. Vfw intervals 

v Dynamic memory allocation 



w Filler out MIDI data 

Key pressure Control Change 

Program change Channel P-essure 

Pitch wheel System Message 

v Graphic Piano Keyboard Display in both 
record and playback mode. 

v* Adjustable Key (Transposition) Ic each 
Irack 

fc" Save recording to disk for later playback or 
editing. 

c Syncs to drum machine as MASTER or 
SLAVE 



Save and load voice parameters for the Yamaha DX series of syn- 
thesizers (DX-7, DX-100, DX-21 etc.). Save sounds individually 
or as a group letting you load the entire synthesizer in seconds. 



DX LIBRARIAN" 



v- PUNCH IN and PUNCH OUT editing 

^ Sequencer leatures 

v* 100% machine code 

^ "Musician Friendly" Menu Driven 

i-*" Metronome 

t* Many songs included 
Includes MIDI hardware interface, 1 MIDI ca- 
bles, detailed manual, and software. Requires 
MK CoCo, Y-Cable or Multi-Pak. 
COCO MIDI 2 (disk only) #CMI47 . $149.95 

DOUBLE Y-CABLE #DYIHI $28.95 

TRIPLE Y-CABLE #TY173 $34.95 



Comes with professionally developed voices for the DX-7 worth 
10 times the price. Requires COCO MIDI hardware interface. 
DX LIBRARIAN (Disk only) #DX143 $39.95 



CASIO LIBRARIAN 



Save and load voice parameters for any Casio synthesizer (CZ-101, 
CZ-1000, CZ-5000 etc.) You can save from the: presets, cartridge, 



memory or buffer. Requires COCO MIDI hardware interlace. 
CASIO LIBRARIAN (Disk only) #CL169 $39.95 



MUSICA MIDI 



TM 



MUSICA MIDI takes any MUSICA 2 music file and plays it through 
your MIDI synthesizer. We offer you over 800 tunes from our 
MUSIC LIBRARY series (sold separately) or create your own music 



using MUSICA 2. Inlcudes: documentation, plenty of music, and 
the cable to connect between the COCO and your synthesizer. 
MUSICA MIDI Complete (Disk Only) #CM126 $39.95 



MIDI KEYBOARD 



II you own the Casio CZ-101 or similar MIDI synlh, you know 
that the mini keys and the short 3 or 4 octave keyboard is limiting. 
MIDI KEYBOARD when used with our full size 5 octave keyboard 



gives you the flexibility you need. Comes with cable to connect 

the COCO to your MIDI synlh. 

MIDI KEYBOARD (Disk only) #MK167 $29.95 



only had to design 26 characters plus a 
period and comma. 

The text is generated to the screen 
using several lines with MIDS, LEFTS, 
RIGHTS and the fiSC command. Other 
programs 1 have written have scrolled 
the text onto the screen; this program 
draws the text on graphics pages 6 and 
7 and then will PCOPV them to pages 1 
and 2 as we view them. The same will 
happen with any graphics we draw. 
They will be drawn off the screen, and 
later we will PCOPY them into view. This 
is the technique we used in Advanced 
Siar*Trench Warfare and Snail's Re- 
venge, to name a few. 

The program takes basic science 
information on the workings of the 
human blood and gives a graphic illus- 
tration of what you might see if you 
used a high powered microscope. The 
user can view red blood cells, white 
blood cells and platelets. If the Speech 
Pak is used, the computer will narrate 
the story along with the text. Once the 
program is started, the user need only 
sit back and watch. One of the best 
graphics is watching the white blood cell 
attack and destroy a harmful invader. 
(Who knows, maybe I could use graph- 



ics like these to make an action Adven- 
ture game based on the movie Fantastic 
Voyage\) 

The material in this program is mate- 
rial 1 use with my science students. 
However, I did refer to Funk and 
Wagnall's New Encyclopedia of Science 
just to be sure my facts were accurate. 

Using the Program 

As always, type in the listing exactly 
as you see it, being careful not to miss 
so much as a comma or space in the 
DATA statements. Be careful around 
lines 85 to 90, since the text 1987 in Line 
85 might look like it is actually Line 87 
in the listing. 

Some older CoCos may require you 
to run the program twice before the 
PCLEflRB command takes effect. If you 
get a quick Syntax Error, run the 
program again. If you get the error 
again, you've made some typos in the 
listing. (Please do not call me late at 
night with your questions on the list- 
ings. Some people on the West Coast 
have called me after midnight, not 
remembering the time difference!) 

When you run the program, the 
screen will ask if you want (T)alking or 



(N)ot. Those without the Speech Pak 
can still use the program by pressing N. 
The program will walk through all the 
graphics. Pressing ENTER advances to- 
the next frame, although the program 
will advance itself after a short while. 

If you are using the program with the 
Speech Pak, be sure you put the pack 
in with the power off before you load 
in the program. Never insert it with the 
power on! 

A screen will appear in either red or 
blue. If the screen is red, press ENTER 
to proceed. If it is blue, press reset and 
run again until the screen turns red. 

If the program seems to hesitate in a 
few spots, remember: It is drawing the 
graphics out of view, and some are more 
detailed than others. 

Conclusion 

Give this new program a try and let 
me know what other ideas we can try 
in this series. (No sex education sugges- 
tions, please.) If time permits, 1 might 
get a simple graphics Adventure put 
together in this fashion. Just keep those 
ideas coming. □ 
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The listing: BLDDD 



GOTO600 



REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 



************************ 



* 
* 
* 
* 
* 
* 
* 



KNOWING YOUR BODY 

HOW YOUR BLOOD WORKS 

A GRAPHIC SIMULATION 

BY FRED B.SCERBO 

60 HARDING AVE. 

NORTH ADAMS, MA 01247 

COPYRIGHT (C) 1987 

************************ 

ljZJ CLEAR1000 : CLS0 : PRINTSTRING$ ( 3 

2,172) ; 

15 F0RI=1T0288:READA:PRINTCHR$(A 

+128) ; :NEXT 

20 PRINTSTRING$(32,163) ; 

25 DATA, 93, 81,94, ,93,91,84,94,85 

,92,92,90,93,80,85, ,85,88,92,94, 

88,84,95,82,93,88,94,9 2,92,93, , 

30 DATA85, 93, 82, ,85,84,91,90,85, 



, , 90 , , 90 , 90 , 90 , 90 , , , 90 , , , 90 , 93 , 8 

7, ,90, ,83,83,, 

35 DATA87, ,93,82,87, ,87,91,85,83 

,83, 90,, 85,, 85,,, 83, 91, 82, 81, 90, 

81,95,82,91,83,83,86,80,80 

40 DATA18, ,18,19,19,18,18, ,17,17 

,19,19,19, ,115,115,115,115, ,113, 

115,115,115,113,115,115,114,113, 

,113,, 

45 DATA2 6, ,26,26, ,26,26, ,21,21, , 

,21,, 117,,, 117,, 117,,, 117, 117,,, 

117, 117,, 117,, 

50 DATA26, ,26,26, ,26,26, ,21,21,1 

6,, 21,, 117,,, 117,, 117,,, 117, 117, 

,,117,117,112,117, , 

55 DATA20, 22, 16, 26, ,26,26, ,21,21 

,28,29,28, ,117,124,124,124,125,1 

17, ,,117, 117, ,,117, ,121, 120,, 

60 DATA, 26, ,26, ,26,26, ,21,21, ,20 

,26,, 117, ,, ,117, 117,,, 117, 117,,, 

117, ,117,,, 

65 DATA, 26, ,27,19,26,27,19,23,21 

, , ,29,32,119,115,115,115,119,117 

,115,115,119,117,115,115,118, ,11 

7,, 

70 PRINT@389," HOW YOUR BLOOD VIO 
RKS ";: PRINTS 4 21," (T)ALKING OR 
(N)OT ? "; 
75 PRINT@453," BY FRED B.SCERB 

o "; 
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80 PRINT@485," COPYRIGHT (C) 19 

87 » ; 

85 X$=INKEY$:IFX$="T"THEN105 

90 IFX$="N"THEN100 

95 GOT085 

100 NT=1 

105 CLS0 

lip XX=&HFF00:YY=&HFF7E 

115 POKEXX+l,52:POKEXX+3,63 

120 POKEXX+35,60 

125 PMODE4,l:PCLSl:PMODE4,5:PCLS 

1 

130 DIMR(23) ,L$(26) ,Y(40) :C$(1)= 

"C1":C$(2)="C2" :C$(3)="C3" :C$(4) 

= »C4" 

135 F0RI=1T026:READL$(I) : NEXT 

140 GOTO270 

145 AA$=JK$ 

150 A$=STR$(A) :B$=STR$(B) 

155 DRAW"BM"+A$+","+B$+C$(CL) 

160 IF LEN(JK$)<=21THEN180 

165 FOR T=21TO0STEP-1:IF MID$ (JK 

$,1,1)=" "THEN175 

170 NEXT T:GOTO180 

175 L$=LEFT$ ( JK$ , T) : W$=L$ : GOSUB1 

85:JK$=" "+RIGHT$(JK$, (LEN(JK$) ) 

-T) :GOTO150 

180 W$=JK$ : B=B+14 : GOSUB185 : RETUR 

N 

185 SL=LEN(W$) :FORI=lTOSL:BB$=MI 

D$(W$,I,1) :C=ASC(BB$)-64:IF C=-3 

2THEN DRAW"BR12":GOTO205 

190 IF C=-18THENDRAW M BR2RBR9":GO 

TO205 

195 IFC=-20THENDRAW"BR2R2D2G2E4B 

R7":GOTO205 

200 DRAWL$(C) 

205 NEXTI:B=B+14: RETURN 

210 IFNT=1THEN2 50 

215 FORII=lTOLEN(AA$) 

220 IF PEEK (YY) AND 128=0 THEN220 

225 POKEYY,ASC(MID$(AA$,II,l) ) 

2 30 NEXTII 

235 IFPEEK(YY)AND128=0THEN235 

240 POKEYY,13 

245 FORHH=1TO600:NEXTHH: RETURN 

250 FORHH=1TO3000 

255 X$=INKEY$:IFX$=CHR$(13)THEN2 

65 

2 60 NEXTHH 

2 65 RETURN 

270 PMODE2,l:PCLSl:SCREENl,l:PMO 

DEI : SCREEN1 , 1 : PCLS0 : POKE653 14 , 24 

8 

275 PCLS3:A=0:B=56:CL=4:JK$=" PR 

ESS RESET AND RUN IF SCREEN IS B 

LUE . " : GOSUB145 : B=B+20 : JK$=" PRES 

S ENTER WHEN THE SCREEN IS RED." 



:GOSUB145 

280 X$=INKEY$:IFX$OCHR$(13)THEN 

280 

2 85 PCLS0:R=3:BL=2 

290 PMODE2,6:PMODEl,6:COLOR2,3:L 
INE(0,0)-(256,48) , PRESET, BF :A=0 : 
B=14:CL=4:JK$=" HUMAN BLOOD PLAY 
S A VERY BIG ROLE IN YOUR DAILY 
LIFE . " : GOSUB145 : PCOPY6T01 : GOSUB2 
10 

295 COLOR2,3:LINE(0,54)-(256,92) 
,PSET,B:B=70:A=0:CL=1:JK$=" IT I 
S MUCH MORE THAN JUST A LIQUID." 
: GOSUB145 : PCOPY6T01 : GOSUB2 10 
300 COLOR2,3:LINE(0,98)-(256,180 
) , PSET , BF : B=114 : A=0 : CL=1 : JK$=" I 
T IS ACTUALLY MADE UP OF MILLION 
S AND MILLIONS OF INDIVIDUAL LIV 
E CELLS . " : GOSUB145 : PCOPY7T02 : GOS 
UB210 

305 PMODE2,3:PMODEl,3: :PCLS4 
310 FORI=2TO252STEP4:PSET(I,0,R) 
: PSET (1+2, 2, R) :NEXTI:GET(0,0)-(2 
56 , 2 ) , Y , G : FORI=4T09 6STEP4 : PUT (0 , 
I)-(256,I+2) ,Y,PSET:NEXTI 
315 PCOPY3T05 

3 20 PCOPY3T06:PMODE2,6:PMODEl,6: 
PCLS4 : LINE (0 , 108 ) - (256 , 180) , PRES 
ET,B:A=0:B=12 6:CL=2:JK$=" THE LI 
QUID PART OF THE BLOOD IS A YELL 
OW COLORED FLUID CALLED PLASMA." 
: GOSUB145 : PCOPY3T01 : PCOPY7T02 
325 GOSUB210 

3 30 PCOPY5TO6:LINE(8,10)-(246,70 

) , PSET , BF : A=0 : B=2 4 : CL=4 : JK$=" PL 

ASMA CONSISTS OF WATER, PROTEINS 

, SUGAR, SALTS AND OTHER SUBSTAN 

CES . " : GOSUB145 : PCOPY6T01 

335 GOSUB210 

340 GOSUB345:PCOPY8T03:GOT03 65 

345 PCOPY5T03:PMODE2,3:PMODEl,3: 

FORI=1TO10+TH 

350 A=(RND(70)*3)+15:B=RND(66)+1 

0: CIRCLE (A, B) ,26,BL, .6:PAINT(A,B 

) ,BL,BL: CIRCLE (A, B) ,26,R, . 6 : PAIN 

T(A,B) , R,R: CIRCLE (A, B) ,12,1, .6, . 

8, .4 

355 CIRCLE(A,B) ,26,1, .6 

3 60 NEXT : PCOPY3T06 : PCOPY3T04 : RET 

URN 

3 65 PCOPY8T07:PMODE2,6:PMODEl,6: 

LINE (0,108) -(256, 164) , PRESET, B: A 

=0:B=12 6:CL=3:JK$=" FLOATING IN 

THE PLASMA ARE MILLIONS OF RED B 

LOOD CELLS . " : GOSUB145 : PCOPY6T01 : 

PCOPY7T02 : PCOPY8T07 

370 GOSUB210:GOSUB345 

375 PCOPY8T07 
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380 COLOR3,2:PMODE2,6:PMODEl,6:L 

INE (0,108)-(256,164), PRESET , BF : A 

=0:B=12 6:CL=4:JK$=" THE RED BLOO 

D CELLS ARE ALSO KNOWN AS RED CO 

RPUSCLES . " : GOSUB145 : PCOPY7T02 : PC 

0PY6T01 : GOSUB345 : PCOPY8T07 

385 AA$=LEFT$(AA$,43)+"KOHR PUSS 

ULS" :GOSUB210 

390 PMODE2,6:PMODE1,6:LINE(0,108 

) - ( 25 6 , 194 ) , PRESET , B : A=0 : B=l 2 6 : C 

L=2:JK$=" THE COLOR OF RED CORPU 

SCLES COMES FROM THE HEMOGLOBIN 

IN EACH CELL WHICH CARRIES OXYGE 

N . " : GOSUB14 5 : PCOPY6T01 : PCOPY7T02 

: GOSUB345 : PCOPY8T07 

395 AA$="THE COLOR OF RED KOHR P 

US S ELS COMES FROM THE HE MO GLO 

BIN IN EACH CELL WHICH CARRIES 

XYGEN":GOSUB210 

400 PMODE2,6:PMODE1,6:LINE(0,108 

) - (256 , 184 ) , PRESET , BF : A=0 : B=12 6 : 

CL=3:JK$=" RED BLOOD CELLS ONLY 

LAST FOR ABOUT ONE HUNDRED AND T 

WENTY DAYS . " : GOSUB145 : PCOPY6T01 : 

PCOPY7T02 : G0SUB345 : PCOPY8T07 : GOS 

UB210 

405 GOSUB410:GOTO425 

410 PMODE2,6:PMODEl,6:X=2:GOSUB4 

15:PAINT(60+WM,18) , 2 , 2 :X=1 :GOSUB 

415:PAINT(60+WM,18) ,4,1: RETURN 

415 PMODE2,6:PMODE1,6:CIRCLE(60+ 

WM,32) ,22,X,1.4, . 56 , 1 : DRAWC$ (X) + 

"BM"+STR$ ( 80+WM) +" , 32F4M+1 , +5F2M 

+8,+3":CIRCLE(96+WM,60) ,20,X, .9, 

.75, .4:DRAW"BM-15,+2 6L2H4L2M-8,+ 

2G4DG4L4H4L2H4U4H4L2H2L8H2U2H4U4 

H2U8E4R2U2R6U2R4U2E4" 

420 CIRCLE (64+WM, 40) ,10,1: PAINT ( 

64+WM,40) ,1,1: RETURN 

425 LINE(0, 108)-(256, 164) , PRESET 

,B:A=0:B=12 6:CL=3:JK$=" WHITE BL 

OOD CELLS ARE ALSO FOUND IN OUR 

BLOOD . " : GOSUB145 : PCOPY6T01 : PCOPY 

7T02 

430 GOSUB210 

43 5 PCOPY8T07:GOSUB3 45:COLOR3,2: 

PMODE2 , 6 : PMODE1 , 6 : WM=9 6 : GOSUB4 10 

: LINE (0,108)-(256,190), PRESET , BF 

:A=0:B=12 6:CL=4:JK$=" THE WHITE 

BLOOD CELLS PLAY A BIG PART IN H 

ELPING FIGHT DISEASE AND INFECTI 

ONS . ■■ : GOSUB145 : PCOPY6T01 : PCOPY7T 

02 

440 GOSUB210 

445 PCOPY8TO7:A=0:B=12 6:CL=2:LIN 

E (0 , 108 ) - ( 256 , 190 ) , PRESET, B : JK$= 

» THE WHITE BLOOD CELLS ATTACK A 

ND DESTROY HARMFUL SUBSTANCES IN 



YOUR BLOOD. " : GOSUB145 : WM=0 : GOSU 
B410 : PC0PY4T01 : PCOPY7T02 
450 GOSUB210 

4 55 PMODE2,6:PMODEl,6:PCOPY8T07: 
FORWM=-2 2TO160STEP2 2 : PCOPY4T06 : F 
ORV=2T014STEP4 : CIRCLE (2 20 , 50) , V, 
BL : NEXTV : G0SUB4 10 : PC0PY6T01 : NEXT 
WM 

4 60 PCOPY8T07 : A=0 : B=12 6 : CL=3 : LIN 
E(0,108)-(256, 190 ) , PRESET , B : JK$= 
11 THE WHITE BLOOD CELLS DESTROY 
THE HARMFUL SUBSTANCE AND REMOVE 

5 IT FROM THE BLOOD .": GOSUB145 : P 
C0PY4T01 : PCOPY7T02 

4 65 PMODE2,6:PMODEl,6:PCOPY8T07: 

PCOPY8T06 : A=0 : B=14 : CL=1 : C0L0R2 , 3 

: LINE (0 , ) - ( 2 5 6 , 62 ) , PSET , BF : JK$= 

" THE BLOOD HAS A SPECIAL MECHAN 

ISM THAT HELPS IT TO REPAIR WOUN 

DS . " : GOSUB145 : PCOPY7T02 : PC0PY6T0 

1 

470 AA$=LEFT$(AA$,58)+"WOONDS":G 

OSUB210 

475 PMODE2,6:PMODE1,6:A=0:LINE(0 

,68)-(256,180), PRESET , BF : CL=4 : JK 

$=" THIS MECHANISM USES TINY PLA 

TELETS IN THE BLOOD WHICH HELP I 

T TO CLOT OR CLUMP WHEN YOU RECE 

IVE A CUT OR AN OPEN WOUND . " : GOS 

UB145 : PC0PY6T01 : PCOPY7T02 

480 AA$=LEFT$(AA$,113)+"W00ND":G 

OSUB210 

485 PCOPY8T06:PCOPY4T07:PMODE2,6 

: PM0DE1 , 6 : A=0 : B=16 : CL=1 : JK$=" TH 

ESE PLATELETS ARE TINY DISKS THA 

T STICK TO EACH OTHER WHEN DAMAG 

E OCCURS." :G0SUB14 5 

490 GOSUB210 

495 CL=3:JK$=" EX. PLATELET" : GOS 

UB145:DRAW"BR10C1E8R2G8":GOSUB50 

0.-GOTO505 

500 PMODE2,6:PMODE1,6:FORI=120TO 

180STEP10 : F0RY=1T03 : A=RND ( 180 ) +2 

: DRAW"BM"+STR$ (A) +" , "+STR$ (I) +" 

C1E8R2G8BF10F8REH2 " : NEXTY , I : RETU 

RN 

505 PCOPY6T01:PCOPY7T02 

510 PMODE2,6:PMODE1,6:TH=20:GOSU 

B3 45 : PCOPY6T07 : PCOPY8T06 : GOSUB50 

515 A=0:B=16:CL=2: LINE (0,0) -(256 
,80) ,PSET,B:JK$=" WHEN BLOOD CLO 
TS OR CLUMPS INTO A SMALL PLUG A 

THROMBUS IS FORMED IN THE BLOOD 

STREAM. " :G0SUB145 
520 PCOPY7TO2:PCOPY6TO1:GOSUB210 
52 5 PCOPY8T06:PCOPY8T07:PMODE2,6 
: PM0DE1 , 6 : A=0 : B=16 : CL=1 : JK$=" IF 
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A THROMBUS GOES TO THE HEART IT 
CAN CAUSE A HEART ATTACK. '•: GOSU 
B145 

53J3 PCOPY7T02:PCOPY6T01 
53 5 GOSUB210 
540 A=p:CL=2:JK$=" IF A THROMBUS 

GOES TO THE BRAIN IT CAN CAUSE 
A STROKE AND BRAIN DAMAGE . " : GOSU 
B145 

545 PCOPY7T02 : PCOPY6T01 : GOSUB2 lj3 
55p A=,0:CL=3:JK$=" BOTH CAN BE F 
ATAL.":GOSUB145 

555 PCOPY7T02:AA$="BOTH AN BE FA 
YTUL" : GOSUB2 10 : FORHH=1TO5£S0 : NEXT 
HH 

560 PCOPY8T06:PCOPY8T07 
565 PMODE2,6:PMODEl,6:COLOR2,3:L 
INE(0,j3)-(256,82) , PRESET, BF :A=0 : 
B=14:CL=4:JK$=" THE BLOOD WILL W 
ORK TO SERVE YOUR BODY AS LONG A 
S YOU WATCH AFTER YOUR HEALTH.": 
GOSUB145 : PCOPY6T01 : PCOPY7T02 
57j3 AA$=LEFT$(AA$,73)+"HELLTH" :G 
OSUB21J3 

575 B=B+2J3:CL=1:JK$=" PRESS ENTE 
R TO RETURN TO START. " : GOSUB145 : 
PCOPY6T01 : PCOPY7T02 
580 DATA U6E2R2F2D2NL4D4BR6,U8R4 



F2G2NL4F2G2NL4BR8,U8R4BD8NL4BR6, 

U8R4F2D4G2NL4BR8,U8NR4D4NR4D4R4B 

R6,U8NR4D4NR4D4BR10,U8R6BD4NL2D4 

NL4BR6 , U4NU4R6U4D8BR6 

585 DATA R2U8L2R4L2D8R2BR6 , NU4R4 

U8L4R6BD8BR6 , U8D4R2NE4F4BR6 , NU8R 

4BR6,U8F4E4D8BR6,U8F6NU6D2BR6,U8 

R6D8NL6BR6,U8R6D4L6D4BR12,U8R6D8 

NL6NH4NF2BR6 

590 DATA U8R6D4L4F4BR6,R6U4L6U4R 

6BD8BR6 , BR4U8L4R8BD8BR6 , NU8R6NU8 

BR6 , BU8D4F4E4U4BD8BR6 , NU8R4NU6R4 

NU8BR6 , E8G4H4F8BR6 , BU8D2F4ND2E4U 

2BD8BR6,NR8E8NL8BD8BR6 

595 IFINKEY$=CHR$(13)THEN RUN EL 

SE595 

600 PCLEAR8:RUN1 
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KEEP-TRAK' General Ledger Reg. S69.95-ONLY $39.95 

Doubio-Eniry General Ledger Accounting Syilem tor home or business 16k 
32k, 64k User-lnendly. menu-driven Program features balance sheet, income & 
expense statement (current & YTD). journal, ledger, 899 accounts & 2350 entries 
on 32k & 64k (710 accounts & entries on I6kj (disk only) Version 1 2 rias screen 
printouts Rainbow Reviews 1 1 - 9.B4 1.2-4/85 

"OMEGA FILE" Reg. $69.95— ONLY S24.95 

Filing data base File any inlormationwilh Omega File Records can have up tu 16 

fields with 255 characters per field (4080 characters/record) Sort, match & print 

any field User Inendly menu driven Manual included (32k 64k disk only} 

Rainbow Review 3/85, Hot CoCo i() 85 

BOBS MAGIC GRAPHIC MACHINE 

Can generate BASIC code to use in your programs Easy drawing and manip- 
ulation ol circles, elipses, boxes, lines and ARCS Single joystick operation with on 
line HELPS al all times Allows text on the graphics screen & movement ot objects 
on (he screen Can be used as a stand-alone graphics editor Insfuction Manual 
GRAPHICS EDITOR. Reg. $39.95 - ONLY $24.95 (or disk or tape. 64KECB 

Rainbow Review 7/85. Hot CoCo 9/85 "The graphics bargain ol the year" 

KEEP-TRAK Accounts Receivable 
Features auto interest calculation, auto ageing ot .iccounts. installment sales, 
total due sales, explanation spaceas long as you need, detailed statements. KEEP- 
TRAK General Leogei lie in account number checking, credit limit checKing & 
more User friendly menu driven Includes manual S39.95 o> S49.95 Genei.il 
Ledger & Accounts Receivables (Disk Onlyj 

COCO WINDOWS' 

Willi hi-res character display and window generator Features an enhanced key 
board iklicks) and 10 programmable lunction keys Allows the user to create 
multiple windows from basic Includes menu driven printer setup and auto line 
numbering Four lunction calculator with memory The above options can he 
called anytime while running or writing in BASIC APPLE PULL YOUR DRAPES 
YOU DON'T WANT TO SEE THIS $24.95 (disk or tape* includes manual 

CALL TOLL FREE 

1-800-942-9402 
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THE OTHER GUI S SOFTwsre (Add S2.50 lot poilage & handlingl 

P.O. Bo» H, 55 N Main COD., Money Ordor. Check in U.S. Fundi 

Logan, UT B4321 |801) 753-7620 (Please upoclly il JAM controller) 



TANDY COMPUTER 
DISCOUNTS 

COLOR COMPUTERS 



26-3127 64k color comp 


89.95 


26-334 CoCo 3 


170.00 


26-3131 1st disk drive 


269.95 


26-3215 CM-8 color monitor 


259.95 


PRINTERS 




26-1276 DMP 105 


160 00 


26-1277 DMP-430 


580.00 


26-1280 DMP-130 


269 00 


MODEL 4 and MSDOS COMPUTERS 


25-1050 Tandy 1000 EX 


530.00 


25-1051 Tandy 1000 SX 


850.00 


25-01011 Plus expansion board 


155.00 


25-1023 CM-5 color monitor 


249.95 


25-1020 VM-4 Monochrome monitor 


110.00 


26-1070 mod 4D 64k 2dr. 


920.00 



We Carry the Complete Line of Tandy 
Computer Products at Discount Prices 

CALL FOR A FREE PRICE LIST 800-257-5556 
IN N.J. CALL 609-769-0551 

WOODSTOWN ELECTRONICS 

Rt. 40 E. WOODSTOWN, N.J. 08098 
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Computerware 

Finally, you have 

OS-9 Level 2, 
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OoW 
C.E.O. 
Complete Electronic Organizer 



This desktop software becomes your personal secretary. 
Includes a year's datebook lor daily appointments 8 am to 5 
pm. calculator, clock, phone directory, and freeform dalabase 
tor important memos. 
Requires 64K. RSDOS, Disk 




Personal Finance System 



PFS makes it easy to organize your linances. Set up your own 

budget and chart-of-accounts: then enter your checkbook 

transactions. Print reports to show income & expenses, 

budget, etc. A special loan & investment module calculates 

financial transactions like interest rates, mortgages, loans. & 

more. 

Requires 32K. RSDOS, 80 column printer. Disk S32.95 



for fun 



MAY SPECIAL! 




Nuke the Love Boat! 



It's up to you to get the bomb away from the terrorists. The 
Requires CoCo 3. mouse or joystick, disk 



The Magic of Zanth 

You are on a journey to discover the 
source of magic in the land ol Zanth. Face 
Dragons. Griffins. Centaurs, & Demons in 
CoCo 3 graphic detail! 
Requires CoCo 3, Disk 






Return of Junior's Revenge 

A great arcade game that brings the pop- 
ular Donkey Kong Jr. to you with full use 
of CoCo 3 graphics! 
Requires CoCo 3. ioystick, disk 



Screen Star 

New OS-9 Screen Editor 
with Smart Speller! 



Screen Star implements the popular WordStar editing capabili- 
ties like 

• Edit files larger than memory by using the disk as an exten- 
sion of memory 

• Move, copy or delete blocks of text with a keystroke 

• Powerlul cursor commands allow fast & easy movement 
throughout the file. 

• Find/Replace makes mass changes and searches a snap. 

• Set paramenter commands to set tabs, toggle the video, 
access the OS-9 shell & more. 

• Define up to 10 function keys. 

• Pop-Up Help menus. 

• Smart Speller included. Unlike other spelling checkers, it 
uses a small dictionary containing the most common 
misspellings and their correct spellings. 

• With the Text Formatter, it makes a powerful word process- 
ing duo for OS-9! 

• Versions for Level 1 & Level 2 included. 

Screen Star (Requires OS-9] S49.95 

Screen Star w/Text Formatter S79.95 



Text Formatter 

OS-9 Text Formatter interfaces with any editor thai produces 
standard ASCII text files including our Screen Star & Radio 
Shack TS Edit. It supports: 

• Right & left justification 

• Automatic pagination 

• Headers & footers 

• Macros, tabs, etc. 

• Page number & auto date insert 

• ESC & CTL codes to the printer 

Why just print it when you can lormat il with OS-9 Text 

Formatter? 

Requires OS-9 S34.95 



Macro Conditional Assembler 

MAC not only supports all standard 6809 assembler mneumon- 
ics & directives, but also thrives on macros, conditional assembly, 
repeal sequences, inclusion of source library files & much more. 
MAC can handle any size source input tiles & can assemble 
source from up to four drives into one output binary file- Also 
includes XREF, a label cross reference program. 
Requires OS-9 S49.95 

MAY SPECIAL S39.95 



Textools 

These utilities designed lor manipulating text Hies are especially 
powerful because they use wildcards. 17 utilities allow easy file 
changes & compression, benchmarking, piping, input format- 
ling, & much more! 
Requires OS-9 S29.95 



for all CoCo's! 



but now you need 



51 2K Memory 
Expansion for CoCo 3 



f*ict 
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• Completely assembled & tested. 

• Prime 1 20 ns memory chips 

• Simple installation with no soldering. 

May Special! Only $99.50 



OS-9 Connection 3.0 




NEW 



T*T^ 



The best in communication software is now available for OS 9. 
Level I and Level 2 All standard protocols are supported, 
including CompuServe Protocol B, XMOOEM. and X0N/X0FF. The 
auto dial feature for Hayes compatible & some Radio Shack 
modems is supported. Macros allow easy entry to often used 
passwords & IDs. Communicate with confidence! 
OS-9 Version S49.95 

RSOOS Version S49.95 



Mitusba 1200 Modem 



Hayes compatible 1200 baud modem — perfect for the Color 

Computer! 

Modem St 59 CoCo Cable S25 



Combo Utilities 

Gel two utilities packages in one — Advanced Utilities plus 
Disk Fix Utilities! 

Advanced Utilities includes: KSHELL which transforms your sys- 
tem by allowing wildcards with any utility & multiple execu- 
tion directory pathing as well as FUNK. ARCHIVE. & CPY. 
DISK FIX supports true double-sided/double-density, 40 tracks 
with step rates up to 6ms and each drive is separately configur- 
able. It also includes DMODE for drive descriptor mods. DlflCOPY 
lor sophisticated directory management, FILELOOK, & COM- 
PARE. PATCH is a user-friendly program lor inspecting & modi- 
fying any disk file including CRC & header, find/search, rela- 
tive address calculation & more. 

Advanced Utilities only S29.95 

Disk Fix Utilities only S34.95 

Combo of BOTH S49.95 



Sourcerer 

This is a menu driven symbolic 6809 disassembler that produ- 
ces symbolic source code thai can be assembled with most 
editor/assemblers including Computerware's Macro Assembler. 
Requires OS-9 S39.95 



hardware 




CoCo 3 Ram disk & 
Memory Diagnostics 

• 512K memory diagnostics includes rotating bit, conver- 
gence & latency tests 

• Double ramdisk creates two full features separate drive 
ramdlsks! 

• Master copy program includes copy with verify, non- 
alphabetic & alphabetic copies 

Requires CoCo 3, 51 2K.RSD0S S19.95 



Kraft Joystick 

S24.95 



Bio Detector 

Learn the art of relaxation through biofeedback or use Ihis 
device for party fun as a lie detector game. All hardware, 
software & instructions included. 
Requires 16K S24.95 



Put a Monitor on Your CoCo 



Universal Video Plus 

Composite video interface for any Co Co 1 
or CoCo 2 

S34.95 





Monitors 

12" NAP amber monochrome monitor 



SI 14.95 plus S5 shipping 



OS-9 is a trademark ol Microware Systems Corporation 

WordStar is a trademark ol MicroPro International Corporation 

Compulerware is a federally registered trademark ol Compulerware 



Call or Write to: 



COMPUTERWARE (619)436-3512 

Box 668 • Encinitas, CA • 92024 



Name _ 

Address 

City 



Yes! Send me your FREE catalog! 

VISA MasterCard 

Card » 

Signature 



State _ 

CoCo D 



Zip. 



Exp.. 



Item 



Format 



Price 



Shipping 6% Calif. Sales Tax 

Surface — $2 minimum. COD Add $5 

2% for orders over $100 Shipping' 

Air or Canada — S5 minimum. TOTAL 

5% for orders over $100 
Checks are delayed for bank clearance 




GRAPHICS TUTORIAL 



Our Highfalutin' Feline Does a CoCo 3 

Fandango 




By H.Allen Curtis 

CoCo Cat gains ever increasing 
popularity with each issue of THE 
rainbow. This lovable feline has 
earned a shot at an audition for his own 
video, and recently in Williamsburg, 
Virginia, CoCo Cat got his chance. 
CoCo Cat claimed to be a sterling 
hoofer (should we say a sterling pawcr?) 
and purrtormed a cat-dance routine 
that was ca lured on the graphics screen 
of the CoCo 3. 

CoCo Cat's dance program is shown 
in Listing 1. The program not only 
displays CoCo Cat's graceful dancing 
skills, but also illustrates some of the 
exceptional animation capabilities of 
the CoCo 3. Some useful CoCo 3 dis- 
coveries have been incorporated into 
the program. 

Five views of CoCo Cat's splendid 
figure were drawn and painted on the 
high resolution graphics screen. HGET 
commands were used to save the figures 
in the high resolution buffer memory. 
Then HPUTs were employed to animate 
CoCo Cat. 

CoCo Cat likens the drawing and 
painting process to make-up applica- 
tion prior to the grand performance and 
has demanded that drawing and paint- 
ing be accomplished completely behind 
the scenes. His demands were not easily 
met. The Color Computer 3 Extended 
basic manual points out that the 
HSCREEN command does the same types 
of tasks as three low resolution com- 
mands: PMODE, SCREEN and PCLS. To 
draw and paint behind scenes, we would 
like HSCREEN to set the features to be 
used on the high resolution graphics 
screen and to clear the screen, but it 
must not display the screen. Unfortu- 
nately, HSCREEN has not been designed 
to do its three tasks selectively, so we get 
a screen display whether we want it or 
not. 

At CoCo Cat's insistance, we studied 
the HSCREEN routine and found that a 

H. Allen Curtis lives in Williamsburg, 
Virginia. He is interested in 1 7th and 
18th century history and enjoys hiking 
through the colonial capital. He balan- 
ces past and present with his computer 
work. 
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The photos above show the five sequential views used to make CoCo Cat appear to dance. 



P0KE&HE6B7,&H39 immediately before 
an HSCREEN and a POKEX.HEGB7,8.H20 
directly after the HSCREEN will do the 
PMODElike and PCLSlike tasks without 
displaying the high resolution graphics 
screen. See, for example, Line 4 of 
Listing 1. 

Our problems were not over yet. 
When all the drawing and painting were 
done, we needed to display the graphics 
screen, but HSCREEN clears the screen 
and would therefore destroy the picture 
of CoCo Cat in his initial dance step. 
With CoCo Cat acting as a twalyst, we 
found that a P0KE8.HEGE4 , &HEG 
immediately before another HSCREEN, 
and a P0KE&HEGE4,&HE7 just after 
the HSCREEN displays the screen without 
clearing it. CoCo Cat was ca/egorically 
thrilled with our discoveries. See Line 
91 of Listing I. 

The pokes following HSCREEN in lines 
4 and 91 restore the HSCREEN routine to 
its original state. Because the BREAK 
key is used to terminate the program 
and it is possible the break could occur 
directly before or after one of the 
HSCREENs, lines 1 and 200 have been 
included to guarantee a restoration of 
the HSCREEN routine. It should be noted 
that 1 found it necessary to include an 
unaltered HSCREEN in Line 2. You might 
run the program once with that 
HSCREEN command deleted, to see the 
effect of its omission. 



The part of Listing 1 concerned with 
drawing and painting - HCOLDR, 
HCIRCLE, HDRHW and HPHINT -- was 
not programmed by any human or cat 
but by CoCo 3 itself. CoCo 3 did the 
programming via a graphics editor 
program we designed in anticipation of 
CoCo Cat's premiere showing. The 
graphics editor, depending on one's 
artistic skills, can program an infinite 
variety of graphics, not just cat graph- 
ics. We hope the graphics editor will 
appear in a future issue of THE RAIN- 
BOW. 

Before closing, CoCo Cat wants me 
to discuss some interesting and advan- 
tageous implications involved in the 
ability to execute HSCREEN commands 
without clearing the high resolution 
graphics screen. This ability allows 
mode switching. As you will see, mode 
switching enhances Mode 4 operations 
by cutting painting time in half, by 
introducing textured (striped) colors, 
and by permitting a second, larger print. 

Listing 2 starts in Mode 2 by means 
of HSCREEN, prints the larger characters 
of thai mode and draws a rectangle 
filled with the Slot 2 color, blue. In Line 
70, the mode is switched to 4. The 
rectangle changes to a lighter, striped 
blue. Lines 50 and 80 calculate how long 
it takes to produce the mode-switched, 
filled rectangle. Finally, the usual small 
letters of Mode 4 are printed. 



Run Listing 2. When the words "the 
Rainbow" appear on the screen, press 
the BREAK key and note the paint time 
printed on the text screen (probably a 
number close to 135). To determine the 
time to produce a rectangle of the same 
size in Mode 4 alone, make the follow- 
ing changes: In Line 20 replace 
HSCREEN2 with HSCREEN4. In Line 60 
replace 100 with 200 and replace the 
original 200 with 400. Delete Line 70. 
Then run the altered program. After the 
rectangle has been completely filled, 
stop the program by pressing BREAK. 
The paint time printed on the text 
screen will be approximately 261. Thus, 
the mode-switched, painted rectangle 
was generated in about half the time of 
the Mode 4 rectangle. 

To produce solid colors in Mode 4 by 
means of mode switching, paint in 
Mode 2 with colors in slots 0, 5, 10 or 
15 to produce the Mode 4 colors asso- 
ciated with slots 0, I, 2 and 3, respec- 
tively. 

CoCo Cat and 1 would be pleased to 
hear from you about his dance routine 
on the tube. Of course, CoCo Cat is a 
purist and refers to the tube as a cathode 
ray tube. 

(You may direct questions about this 
program to Mr. Curtis at 172 Dennis 
Drive. Williamsburg. VA 23185. 804- 
229-7086. Please enclose an SASEfor 
a reply when writing.) □ 
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Listing 1: CflTDRNCE 

j3 'CoCo Cat Dancing 
By H. Allen Curtis 
JANUARY, 1987 

1 ON BRK GOTO200 

2 PALETTERGB:HSCREEN1:WIDTH4^!:CL 
S4 : LOCATE17 , 6 : ATTR3 , 3 , U : PRINT"CC 



BS"; :ATTR3,3:LOCATE6,8:PRINT" (Co 
Co BroadCAsTing System) " :LOCATEl 
2,11: PRINT"Proudly Presents" : LOC 
ATE15,14:ATTR3,3:PRINT" CoCo Cat 
" ; : LOCATE 17 , 6 : ATTR3 , 3 

3 POKE&HFFD9 ,0 : PALETTERGB : HCOLOR 
3,0 

4 POKE&HE6B7,&H39:HSCREENl:POKE& 
HE6B7, &H20 

5 DIMC(15) :FORI=j3T03:READC(I) : PA 
LETTEI , C ( I ) : NEXT 

6 DATA18 ,53,63,0 

7 HBUFF1,4 62:HBUFF2,4 62:HBUFF3,4 
62 : HBUFF4 ,462: HBUFF5 ,462: HBUFF6 , 
903 : HBUFF7 , 903 : HBUFF8 , 903 
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8 HGET(217,145)-(303,165) ,5 

10 HCOLOR 1 

11 HDRAW"BM148,64 

12 HCIRCLE(160,60) ,13, ,1, .448, .0 
51 

13 HDRAW»'BM172,64M+7,+2M+3,+3D4M 
-1 , +3M-8 , +1M-14 , -1M-15 , +1M-5 , -1M 
-1 , -3M+1 , -3M+3 , -3M+3 , -2M+3 , -1BM1 
72,64U2 

14 HPAINT(162,62) ,1, 1 

15 HDRAW"BM166,49M+6,-9M-2 / +ll 

16 HPAINT(168,48) ,1, 1 

17 HDRAW"BM153,50M-6,-10M+3,+13 

18 HPAINT(151,48) ,1, 1 

19 HDRAW"BM158,77D10M-2,+2M-2,-2 
L3M-3 , +2M+4 , +4M-3 , +13M-3 , +6M-5 , + 
10M-1 , +6M+2 , +9M+3 , +4M+3 , +2D2R6BM 
162 , 77D10M+5 , +1M+4 , -1M+3 , +2M-3 , + 
3M+2 , +10M+3 , +7M+6 , +11M+2 , +7M-1 , + 
7M-2 , +6M-2 , +2D3L6U2L19D2 

20 HPAINT(154,13 2) ,1, 1 

21 HCOLOR 2 

22 HDRAW"BM158,94M+2,-2R3M+l,+2M 
+1 , +7M+3 , +8M+4 , +7M+1 , +4M+1 , +5M-1 
, +6M-5 , +2M-5 , +1M-7 , -1M-3 , -3M-3 , - 
6U8M+4 , -6M+2 , -5M+2 , -5U2U4 

23 HPAINT(158,109) ,2, 2 

24 HCOLOR 3 

25 HDRAW'«BM159,65U2R3D2L3 

26 HPAINT(160,64) ,3, 3 

27 HDRAW"BM165,58D1BM156,58D1BM1 
77,66M+ll,-3M+3,+lBM182,69M+6,+l 
M+4 , +2BM181 , 74M+5 , +2M+2 , +2BM142 , 
67M-6 , -1M-5 , +2BM140 , 70M-7 , +1M-4 , 
+3BM138,74M-6,+4ClBM18 3,13 3R21Ul 
04M-3 , -2M+2 , +2M+1 , -4M-1 , +4R21D13 
L5U8L10D104L28 

28 HPAINT(189,13 6) ,1, 1 

29 HGET(122,88)-(203,130) ,8 

30 HDRAW"BM149,89M-19,+21M+24,+l 
4BM156 , 120M-18 , -11M+14 , -16 

31 HPAINT(149,93) ,1, 1 

32 HDRAW"BM157,120M+3,-lM+l,+2D3 
M-2,+3M-3,+2M-3,-lM+l,-3 

33 HPAINT(157,122) ,1, 1 

34 HDRAW"BM173 / 89M+21,+21M-24,+l 
6BM167 , 122M+18 , -13M-14 , -16 

35 HPAINT(173,93) ,1, 1 

36 HDRAW"BM166,122M-l,-lM-2 / +2D2 
M+l , +3M+2 , +1M+3 , +1M+1 , -2U3 

37 HPAINT(170,121) ,1, 1 

38 HDRAW"BM149,145M+l,+16M-23,+2 
M-2 , +2R32M+2 , -2M-4 , -18 

39 HPAINT(154,148) ,1, 1 

40 HDRAW"BM172, 145M-3 , +13M+1 , +5M 
+2 , +1M+1 , +1R27M+2 , -1U1M-25 , -2M+1 
,-16 

41 HPAINT(175,149) ,1, 1 



42 HGET(117,145)-(203,165) ,1:HGE 
T(122,88)-(203,130) ,6 

43 HPUT(117,145)-(203,165) ,5:HPU 
T(122,88)-(203,130) ,8 

44 HDRAW"BM149,89M-24,+8M+l,+19B 
M132,115M-1,-14M+21,-8BM133,115R 
3M+2 , +2M-1 , +3M-5 , +1M-6 , +1M-3 , -1U 
2M+l,-2M+3,-l 

45 HPAINT(130,116) ,1, 1 

46 HDRAW"BM175,90M+16,+18M-22,+l 
4BM166, 118M+16 / -11M-11,-14 

47 HPAINT(174,93) ,1, 1 

48 HDRAW"BM165,118M-3,-lM-3,+3M+ 
1 , +3M+2 , +2M+4 , +2M+2 , -1U2U3 

49 HPAINT(164,121) ,1, 1 

50 HDRAW"BM148,145M+3,+17L16M-6, 
+lM-3,+2R32M-3,-20 

51 HPAINT(153,147) ,1, 1 

52 HDRAW"BM172,145M-5 / +10M-ll,-l 
M-ll , +1M-2 , +1M-1 , +1M+28 , +3M+3 , +1 
M+2,-lU4M+3,-ll 

53 HPAINT(174,147) ,1, 1 

54 HPAINT(149,156) ,1, 1 

55 HGET(117,145)-(203,165) ,2:HGE 
T(122,88)-(203,130) ,7 

56 HPUT(117,145)-(203,165) ,5:HPU 
T(122,88)-(203,130) ,8 

57 HDRAW"BM149,89M-24,+8M+l,+19B 
M132,115M-1,-14M+21,-8BM13 3,115R 
3M+2,+2M-l,+3M-5,+lM-6,+lM-3,-lU 
2M+l,-2M+3,-l 

58 HPAINT(130,116) ,1, 1 

59 HDRAW"BM175,90M+16,+18M-22,+l 
4BM166, 118M+16,-11M-11,-14 

60 HPAINT(174,93) ,1, 1 

61 HDRAW"BM165 / 118M-3,-lM-3,+3M+ 
1, +3M+2 , +2M+4 , +2M+2 , -1U2U3 

62 HPAINT(164,121) ,1, 1 

63 HDRAW"BM148,145M+2,+17M-18,-l 
M-8 , +4R32M+2 , -1M-3 , -19 

64 HPAINT(130,163) ,1, 9 

65 HDRAW"BM173,145M+7,+20R2M+21, 
-14M-2,-2M-6,+2M-ll,+5M-l,+lM-4, 
-12 

66 HPAINT(177,148) ,1, 1 

67 HGET(117,145)-(203,165) ,3 

68 HPUT(117,145)-(203,165) ,5:HPU 
T(122,88)-(203,130) ,8 

69 HDRAW"BM173,89M+5,-lM+12,+lM+ 
4 , +17M+3 , -1M+2 , +1M+1 , +3M-1 , +2M-5 
, +2M-3 , +1M-2 , -2U2M+1 , -1M-5 , -15M- 
14,-2 

70 HPAINT(176,91) ,1, 1 

71 HDRAW"BM149,89M-18,+15D2M+1,+ 
2M+22 , +5D2M+2 , +3R4M+2 , -4M-1 , -4M- 
2,-lM-2,+lM-16,-7M+ll,-10 

72 HPAINT(149,93) ,1, 1 

73 HPAINT(159,113) ,1, 1 
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74 HDRAW"BM172,145M-3,+18M+l,+lR 
30M+3 , -1M-3 , -2M-23 , -1M+1, -16 

75 HPAINT(177,147) ,1, 1 

76 HDRAW"BM149,144M+2,+9M-l,+2M+ 
2 , +2M+30 , -3M+2 , -1M-1 , -2L20M-6 ,+1 
M-3,-7 

77 HPAINT(154,149) ,1, 1 

78 HPAINT(181,152) ,1, 1 

79 HGET(117,145)-(203,165) ,4 

80 HPUT (117 ,145) -(203 ,165) ,5:HPU 
T(122,88)-(203,130) ,8 

81 HDRAW"BM173,89M+5,-lM+12,+lM+ 
4 , +17M+3 , -1M+2 , +1M+1 , +3M-1 , +2M-5 
, +2M-3 , +1M-2 , -2U2M+1 , -1M-5 , -15M- 
14,-2 

82 HPAINT(176,91) ,1, 1 

83 HDRAW"BM149,89M-18,+15D2M+1,+ 
2M+2 2 , +5D2M+2 , +3R4M+2 , -4M-1 , -4M- 
2,-lM-2,+lM-16,-7M+ll,-10 

84 HPAINT(149,93) ,1, 1 

85 HPAINT(159,113) ,1, 1 

86 HDRAW"BM172,145M-3,+18M+l,+lR 
30M+3 , -1M-3 , -2M-23 , -1M+1, -16 

87 HPAINT(177,147) ,1, 1 

88 HDRAW"BM149,144M-8,+14M-17,-8 
LLL5M-1 , +1M+28 , +14M+2 , -1U4M+6 , -1 
5 

89 HPAINT(149,151) ,1, 1 

90 HGET(117,145)-(203,165) ,5:HGE 
T(122,88)-(203,130) ,8 

91 HLINE(56,8)-(280, 16) , PRESET, B 
F:HCOLOR3:HPRINT(12,l) , "CoCo Cat 

Dancing" : POKE&HE6E4 , &HE6 : HSCREE 
Nl:POKE&HE6E4,&HE7 

92 GOSUB94:GOT092 

93 HC0L0R1:HLINE(56, 8) -(280,32) , 
PSET,BF 

94 HPUT(117,145)-(203,165) ,1:HPU 
T (122 ,88) -(203,130) , 6:GOSUB100 

95 HPUT(117,145)-(203,165) ,2:HPU 
T(122,88)-(203,130) , 7 : GOSUB100 

96 HPUT(117,145)-(203,165) ,3:GOS 



.; MVSbvJIVS ~)0\^.OIti^ 



RGB VIDEOSo1^f L 

.WHITE OR GREEN CHARACTERS ON A 
BLACK SCREEN-PLUS NORMAL GREEN 
SCREEN-SWITCH SELECTABLE 

.NO SPECIAL SOFTWARE 

.HI-RF.S GRAPHICS 

.ADD S5.WJ SHWPINC t. HANDLING 

INVENTIVE SOLUTIONS 

BOX JS6 
STANFORDVILLE.N.Y. 
(914)528 M04 12506 



.USING THE COCO AS A DEVELOPMENT 
SYSTEM 

.HIDDEN MODEM 

.MONOCHROME VIDEO DRIVER-WHITE 
CHARACTERS ON A BLACK SCREEN 

.COMPOSITE VIDEO DRIVER 

.PARALLEL PORTS 

.D/A A/D CONVERTERS 

.ELECTRONIC FLEA-MAKKET (PARTS) 

.AND MUCH MORE 

DEAL DIRECT WITH MANUFACTURER 

SEND OR CALL FOR FREE CATALOG 
OR INFORMATION 



UB100 

97 HPUT(117,145)-(203,165) ,4:HPU 
T(122,88)-(203,130) ,8:GOSUB100 

98 HPUT (117, 145) -(203 ,165) ,5:GOS 
UB100 

99 PALETTE0, RND( 51) : RETURN 

100 FORK=0TO7 5: NEXT: RETURN 

200 POKE&HE6B7,&H20:POKE&HE6E4,& 
HE7 : POKE&HFFD8 , : WIDTH3 2 



Listing 2: RECTflNGL 

10 PALETTERGB 

20 HSCREEN2 

30 HCOLOR2 

40 HPRINT(12,3) , "CoCo Cat loves 

50 X=TIMER 

60 HLINE(100,50)-(200,120) ,PSET, 

BF 

70 POKE&HE6E4,&HE6:HSCREEN4:POKE 

&HE6E4,&HE7 

80 CLS: PRINT :PRINT"THE 'PAINT' T 

IME WAS ";TIMER-X 

90 HPRINT(32,18) , "the Rainbow 

100 GOTO100 



<«G1MMES0FT>» 

A new generation of 
CoCo III software 



is. .© © © (si. m ffl a 



ft user friendly, user prograaable (unction 
key utility that creates up to 20 function 
keys. Other features include DOS aods, 
DISABLE, and is EPROHable. Compatible with 
CoCo I/II and includes enhanced CoCo III 
version! Ver 1.3 - Disk only 119.95 



nULTl-LMEL 1X1 



L'ERSION 1.0 



XT 



vZ 



An easy to use, versatile label creating 
prograi including aany new CoCo III 
features. Even if you already own a label 
prograi, this one's a aust for the III!! 

Disk $14.95 

GIHMESOFT 

4 Hallfield Ct. Add $2.50 for shipping 

Baltimore, HD 21236 Phone 301-256-7558 
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Look What's New at NOVnSOFT! 



Top-quality software at 

affordable prices, written by 

well-known authors in 6809 

Machine Language 




Coco 3 Compatible only 

NEW RELEASE 

THE WILD WEST 

Get out your six shooter and polish your 
spurs! Journey into the gunslinging land of 
the old west. As sheriff of Dry Gulch, your 
job is to keep the peace. But the notorious 
desperado Black Bart has escaped from jail 
and is on his way to Dry Gulch to recover 
his hidden fortune! 

Can you set a trap to capture Black Bart? 
Or will he get you! You'll have to use every 
trick in the book, and be quick on the draw 
as well, as you talk to some unsavory 
characters. Decide what items you'll need 
to buy from the General Store, and lay a 
trap for your enemy! 
The Wild West Is designed to be played 
exclusively on the Tandy Color Com- 
puter 3.) It has several features not seen 
In most adventures. 
•Incredible animated 320 x 192 16 color hi 

resolution graphic scenes! 
• Four voice music and sound effects. 
•Save and load games in progress. 
•A vocabulary of over 100 words. 
•Automatically SPEAKS with a Tandy 

Speech Pak. 

Requires a 128k Coco 3 and one disk drive 
Dis k $25.95 



# Maui Vice 

Step into the shoes of Crockett & Tubbs, 
and gather evidence, photographs and wit- 
nesses to convict your suspects! With 
"windows" to select your options, hi-res 
graphics, and a new story generated each 
time you play. This is state-of-the-art that 
guarantees excitement and newness every 
time you play. 

64K Ext. Basic & Joystick Required 
Disk $21.95 



FOURCUBE 

Now you can play TIC-TAC-TOE in 3D. The 
board consists of a 4x4x4 grid of cells. Pit 
your wits against the computer with six 
levels of difficulty or against your favorite 
opponent. Sound easy? Try it and you'll 
agree with us when we say its a "real 
challenge". 

Requires 32K 1 or 2 Playe rs 
Tape $15.95 Disk $18.95 



giji i? u r 

1 ■" SgB.f.So" " "oh v 

nnnamuu an 


.Hi 

1 


J (J*| OUXT liriHE 

■ t'HV IT m t VUUP TllPH 

; ■ |.n vpu mini TO 


r 

ft: 
p.. ■ 


mm rnnnsnci rurni 

mucpi; is t"Lnviint: 


i 

-* 


miii mint 


i 

"ED 1 

9eao 


ffi % 


? 7 


It 


— 7 -, 


fc~$' 







* 



Moneyopoly 




Play the popular board game on one of 
the most realistic computer game simula- 
tions ever! Contains all the features of the 
original. Buy, sell, rent, wheel & deal your 
way to fortune. 

32K Joystick Required 
Tape $19.95 Disk $22.95 




* Vegas Game Pak 

Six games in all! Blackjack, Keno, Video 
Poker & 3 slot machine lookalikes. Super 
graphics! 

1 6K Ext. Basic Required 

Tape $24.95 Disk $27.95 



LUNCHTIME 

Your chef, Peter Pepper, is surrounded! 
Dodge pickles, hot dogs, and eggs while 
building hamburgers. This high res game 
features 7 difficult levels of wild entertain- 
ment. Fast paced action for either one or 
two players. Have a Burger Time. . . 
Requires 32K & Joysticks 
Tape $18.95 Disk $21.95 

Tom Mix Products at 
New Reduced Prices! 

Sailor Man-Defeat the bigfatbadguy and 
win Elsie's heart. Super graphics, * 

64 K Tape $24.95 Disk $27.95 
|* Dragon Slayer— Defeat the dragon by 
finding your way through a mountain maze. 
Gather treasure but avoid the deadly traps! 
160 exciting screens. 

32K S Joy stic k or Keyboard 
Disk $24.95 ~~ 
The King-* 

32K Tape $24.95 Disk $27.95 
Draconian— * 

32K Tape $19.95 Disk $22.95 
Ms. Maze-* 

32K Tape $19.95 Disk S2Z95 
Kater Pillar II-* 

1 6K Tape $1 9.95 Disk $22.95 
Warehouse Mutants— # 

1 6K Tape $ 1 8.95 Disk $2 1 .95 
Buzzard Bait— * 

32K Tape $19.95 Disk $22.95 

♦Equals CoCo 3 Compatible 

NOVflSOFT 

A Tom Mix Company 

P.O. Box 201 

Ada, Michigan 49301 

616/676-8172 

Ordering Information 

• Add $3 shipping/handling 

• Ml residents add 4% sales tax 
■ Dealers welcome 

• Many more titles-write for free catalog! 

Credit Card Orders 

Call 616/676-8172 
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TOM MIX'S MINI-CATALOG 




Educational Best-Sellers! 



* P-51 Mustang 
Attack/Flight Simulation 

The ultimate video experience! Link two 
CoCo's together by cable or modem, and 
compete against your opponent across 
the table OR across the country! (Both 
computers require a copy of this program). 
The P-51 flight simulator lets you fly this WWII 
attack fighter in actual combat situations— 
against another player OR against the 
computer. 

32 K Machine Language 

Flight Manual Included 

TapeS29.95 Disk S34.95 




w Worlds of Flight 
Small Plane Simulation 

Real-time simulation generates panoramic 
3-D views of ground features as you fly 
your sophisticated plane in any of nine 
different "worlds." Program models over 35 
different aircraft/flight parameters. Realistic 
sound effects too! Manual included helps 
you through a typical short flight. 
32K Machine Lan guage 
Flight Manual In cluded 
Joysticks Requ ired 
TapeS29.95 Disk $34.95 



Teachers Database II— Allows teachers 
to keep computerized files of students. 
Recently updated with many new features! 

• Up to 1 00 students, 24 items per student 

• Many easy-to-follow menus 

• Records can be changed, deleted, 
combined 

• Statistical analysis of scores 

• Grades can be weighed, averaged, 
percentaged 

• Individual progress reports 

• Student seating charts 

• Test result graphs/grade distribution 
charts 

64K TDBII $59.95 Disk Only 
32K TDBI $42 .95 T ape $39.95 

NOW AVAILABLE FOR IBM PC & 

COMPATIBLES-Holds information on up to 
250 students with as many as 60 individual 
items of data for each. Contains the 
features listed above PLUS. 

Requires 128K- $89.95 



Factpack— Three programs for home or 
school use provide drill and practice with 
basic "-/+/■ /x" Grades 1-6. 
32K Ext. Basic 
Tape $24.95 Dis k $29.95 

Vocabulary Management System-Helps 
children learn and practice using vocabu- 
lary and spelling words. Eleven programs 
including three printer segments for tests, 
puzzles, worksheets and five games; many 
features make this a popular seller! 

Requires 1 6K Ext. Basic/ 
32K for Print er Output 

Tape" $39.95 Disk $42.95 

Fractions— A Three-Program Package. 
1 /Mixed & Improper 2/Equivalence 
3/Lowest Terms. Practice, review and defi- 
nitions make learning easy. 
32K Ext. Basic 
TapeS30.95 Disk $35.95 




# NEW RELEASE 

GOLD FINDER 

Here's the quality you have come to expect 
from TOM MIX. Another outstanding color 
computer game. This one ranks right up 
there with "Donkey Kong". Listen to this: 
69 levels for one or two players PLUS you 
can create your own levels (up to 306 on 
a disk). Endless possibilities await you in 
this exciting new creation. Move over 
Goldrunner and Loderunner, here comes 
GOLD FINDER. . . 

32K & Joysticks Required 
Disk $27.95 

We Have More Software 

Available Than Listed Here. 

Please Write for a Free Catalog! 




NEW RELEASE 

THE BLACK HOLE 

For anyone who enjoys solving a challeng- 
ing logical puzzle, here is a 3-dimensional 
puzzle composed of 63 numbered cubes 
in a 4 by 4 by 4 array that leaves one 
BLACK HOLE. You tell the computer to sort 
the cubes and the computer tells you to put 
them in numerical order. A real brain 
bender. Outstanding color and action. 
Years of entertainment. . . 

For IBM PC & Compatibles 
$24.95 

More Tandy-IBM/PC software available. 



Unique Utilities! 

New! Use the tools we've used to create 
"Donkey King," "Sailor Man" and others! 

• Full use Of 64K RAM 

• 100% Machine Language 

• No ROM Calls 

• Selectable Drive 

• Support 1-4 drives 

• Menu Selected functions 

• "Cold Start" exit to Basic 

• Parameters easily changeable in basic 
loader 

MAS Assembler— the finest ever! 
(Includes EDT) 

Disk $74.95 
EDT— Effortless full screen editing w/2-way 
cursor. Text files to 48K+. Copy, save, 
move, delete, print blocks, much more! 

Disk $39.95 
Deputy Inspector-Alphabetize, resort and 
backup directory; fast 3-swap backups, 
copy files or programs, auto-reallocate 
granules during backup for faster loading, 
more! 

Disk $21.95 
Sector Inspector— Alphabetize, backupand 
print directory; repair crashes, LLIST basic 
programs, read in and edit 23+ grans, 
much more! 

Disk $29.95 

to 

TOM MIX SOFTWARE 

P.O. Box 201 
Ada, Michigan 49301 

616/676-8172 
Ordering Information 

•Call us at 61 6/676-81 72 
for Charge Card orders 

• Add $3.00 postage and 
handling 

• Ml residents add 4% 
sales tax 

• Authors— We pay top 
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royalties! 

# CoCo 3 Compatible 
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By Bruce K. Bell, O.D. 

Often it seems we are making plans to remodel, move 
furniture, build an addition or even a new house 
(though these plans don't always find their way to 
completion). During these times, I whip out the old graph 
paper, ruler, pencil and, of course, a big eraser. Then I begin 
counting squares. I've always thought this was complicated 
and have felt there must be a better way. Well, now there is. 

Archie is a dedicated graphics editor that allows you to use 
your joystick to draw and design floor plans for building, 
remodeling, or just rearranging furniture. Archie features 
automatic sizing, pre-drawn furniture and fixtures of standard 
sizes, editing capabilities, and a pull-down icon menu with a 
point-and-click interface. Additionally, you can save and print 
your designs for future reference. 

Getting Started 

Type in and save both listings to cassette or disk. Save these 
under the filenames ARCHIE (Listing I) and ARC (Listing 2). 
Use an extension of BflS if you are saving to disk. Note that 
both programs must be saved on the same tape or disk. If 
cassette is used, save Listing I first and Listing 2 immediately 
following. 

Bruce Bell practices optometry in his hometown of Rockmart, 
Georgia. He spends hours using programs he finds in THE 
RAINBOW and programming his CoCofor use in his office and 
at home. Bruce 's program, CoCo Zone is the grand prize 
winner in the Third Rainbow Adventure contest. 
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Once debugged and backup copies 
are saved, connect your right joystick, 
mouse, touch pad, or other analog-to- 
digital device and enter RUN "ARCHIE" 
(disk) or CLQflO "ARCHIE" (cassette). 
Answer the prompts concerning the 
high speed poke and loading device. If 
you are using disk, both programs are 
loaded and executed automatically. For 
cassette, enter RUN when you've loaded 
Archie and enter RUN again when you 
see BASIC'S OK prompt. By the way, 
loading from cassette can take a while, 
so be patient. 

Because of the PCLEflR bug in Ex- 
tended BASIC 1 .0, you may encounter an 
error on the first try. Just enter RUN 
again, and the program should operate 
fine. 



Circle 
[Square 



Bon Fill 



roin 



M ras 



Type — , 
Paint-; 



Ho lb] 



r C i r c i e ui a 1 1 Copy- irFurniture Print -i 
L-square mai l Mo ue-J [ .Fix ture s scale-] 

"TOHlDSupT-rff^fSIT" 



Disk 10 

cassette 



Help 



-Pallelte 



ne scre en-, l iOe f aulti Tr 



OUit 1 

asn-,1 



s \m ra © gdjic 



incites 
per 

Piiiel- 



current Paint colors 

■ j II Jill 

'"i". 8* -i 



ig» 



ax 



lyiil M 

46' 04- S i 



an 
Size 



Figure 1: Command Mode 

Command Mode 

Archie offers two modes of opera- 
tion, the design mode and the command 
mode. The command mode consists of 
an icon menu and auxiliary menus. 
Each icon represents a function within 
the program (See Figure 1). By moving 
the arrow pointer to a desired icon and 
pressing, then immediately releasing the 
firebutton on the joystick, the selected 
function is called. The first 14 functions 
(Circle through Fixtures) relinquish 
control directly to the design mode and 
are covered later. The remaining func- 
tions are for controlling I/O operations 
or program parameters. They are as 
follows. 

Scale — This program is capable of 
operating at 23 different scales. The 
scale refers to the number of inches 
represented by each pixel. A pixel is a 
single dot on the Hi-Res computer 
screen. Clicking on the scale icon, 
represented by a ruler, reverses the 
colors of the scale icon. Also you will 
notice that the numbers in the lower 
portion of the icon menu change as you 
move your joystick horizontally. You 
may select a scale of one to 12 inches 
in Vi inch steps. The dimensions to the 
right of the arrow give the maximum 
area available at each scale. To achieve 
the highest resolution, it is advised that 



the smallest scale (inches per pixel) in 
which your plan will fit, be used. When 
the desired scale appears, click to set the 
scale and return to the command mode. 
Print — Clicking on this icon allows 
you to print the floor plan to a dot 
matrix printer. The printer driver in- 
cluded in Archie is a modified version 
of J. Paul Fountain's Graf Dump (RAIN- 
BOW, October 1983). This driver works 
with printers recognizing the following 
codes: 



S0D carriage return-line feed 
SIC repeat data 
$12 enter graphics mode 
$1E end graphics mode 

This includes most Tandy/ Radio Shack 
printers with dot-addressable graphics 
capability. The resulting printout is 
double sized and is printed on its side, 
using almost all of an 8'/2-by-ll inch 
page. When this function is selected, the 
icon color is reversed, and an auxiliary 
menu appears with three options. Move 
the arrow to the desired function and 
click. Clicking on Return takes you 
back to the icon menu. Clicking on 
Print begins the screen dump. Clicking 
on Grid overlays a dot grid on your 
floor plan and then begins the screen 
dump to your printer. This grid is useful 
for measuring on the hardcopy floor 
plan. The space between each dot is 
equal to that in the legend at the top 
right. 

You can terminate printing by press- 
ing and holding down the CLEAR key. 
You may have to hold this down for a 
few passes of the print head before 
printing stops. 

Disk and Cassette — Either of these 
functions calls an auxiliary menu with 
options for Save, Load, Return and 
Drive tt. 

Before saving a file, you should enter 
the new filename, designer, and date in 
the default menu. When using a disk, all 
files are saved with the extensions ARC. 
Also with disk, a file menu is displayed 
when loading. To load a displayed file, 
point and click the desired filename. 
Archie displays only those filenames 
that have the extension ARC. If a file is 
desired that does not have this exten- 
sion, point and click on *Load. You will 
be asked for the filename. Include its 
extension. Point and click on *Abort to 
return without loading a new file. When 
loading a cassette file, you will be asked 
for a filename. Prepare the tape for a 
filename (whether disk or cassette). You 
may abort the procedure by entering an 
up arrow instead of a filename. Of 
course, once the loading device is en- 



gaged, you must wait for the procedure 
to complete. 

When a file is saved to disk or 
cassette, the designer's name, date and 
current scale are also saved. This infor- 
mation is retrieved when a file is loaded, 
and that scale is put in force. 

If you attempt to save a file on a disk 
that is full, a full-disk error message 
alerts you. Also, if you attempt to load 
a non-existent file, an unable-to-find 
error message appears. If you attempt 
to choose the disk I/O option without 
Disk BASIC in force, the message 
WHERE '5 DISK BASIC? appears. 

If a file is saved to tape under Disk 
basic, then it must be loaded under 
Disk BASIC. If saved without Disk 
BASIC, then load it without Disk BASIC. 
This is due to the different starting 
locations of graphics memory for Disk 
and non-disk BASIC. 

Screen — Clicking on this icon tog- 
gles the screen between a buff back- 
ground (Screen 1,1) and a green back- 
ground (Screen 1,0). 

Help — Calls three different screens 
of reminders. These help screens are not 
intended to replace these instructions. 
They are intended to assist those who 
have a basic understanding of Archie's 
operations. 

Palette - - There are 256 different 
colors/ patterns available to you on 32 
different palettes — eight colors on each 
palette. The current color palette ap- 
pears in the eight boxes on the fourth 
row of the icon menu. Clicking on the 
palette icon reverses the color of this 
icon and changes the colors in these 
eight boxes, depending on the horizon- 
tal position of the joystick. Adjust the 
joystick until the palette containing the 
desired color appears and click. The 
new palette is set. 

To select a particular color, point and 
click on the color. The color box in the 
upper-right corner of the screen will 
change, showing the new current color. 
If the current function (also shown in 
the upper-right of the screen) is Box 
Filled or Paint, control is transferred to 
the design mode; otherwise control 
remains in the command mode. 

Defaults — Clicking this icon will 
bring up an auxiliary menu with File- 
name, Author, Date, Wall, Auto Size, 
Print I.D, Measure and Return. Each of 
these may be altered by pointing and 
clicking the menu item. The last three 
items automatically toggle. The first 
three allow you to type in the appro- 
priate information. The Wall item al- 
lows you to specify wall thickness in 
your floor plan. This may be changed 
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as often as desired. All calculations and 
drawings will be based on the parameter 
in force at the time they are drawn. This 
is useful when drawing 6-inch exterior 
walls and 4'A-iuch interior walls. The 
Print I.D. item, when on, prints the 
filename, author's name, and date when 
two or more designs are concatenated 
(joined together) to make one large 
printout. Notice that the right side of 
screen is printed first, so that the right 
side of the second plan should be de- 
signed to match the left side of the first 
plan. Also notice that drawings may 
only be concatenated along the horizon- 
tal axis. 

Realizing that both the Color Com- 
puter and RAINBOW have become inter- 
national entities, a choice between U.S. 
and metric systems of measurement are 
available. Clicking on Measure toggles 
between the two. When in the metric 
system, the scale is given in centimeters 
(C) and the dimensions are given in 
meters. A conversion of 30.48 centime- 
ters per foot is used. 

Trash — This clears the current 
screen. This may also be accomplished 
by pressing SHIFT-CLEAR simultane- 
ously in the design mode. This can be 
undone by pressing SHIFT and the down 
arrow in the design mode. 

Quit — If you accidentally quit, type 
CDNT and press ENTER to return to the 
program. Type POKE 113,0: 
EXEC40999 to clear memory for a new 
program. I made it a bit cumbersome on 
purpose so that accidental data loss 
would be less likely. 
Design Mode 

The design mode allows you to work 
on your plan using the current function 
(see Figure 2). Most of the control is 
through joystick input, although some 
keyboard input is required. A small 
blinking dot, acting as cursor, repre- 
sents the current draw position. First 
let's look at the 14 functions available. 
In each of the descriptions below, the 
function is invoked by pressing and 
holding down the firebutton while 
moving the joystick. Releasing the 
firebutton completes the maneuver. 

Circle — Place the joystick where you 
want the center of your circle and, while 
pressing the firebutton, move the joy- 
stick to produce the desired radius. The 
radius (one-half the diameter) appears 
in feet and inches in the top center of 
the screen. 

Square — Place the cursor at one 
outside corner of the desired position of 
the square and, while pressing the 
firebutton, move the joystick until the 
desired square is made. The width and 
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Figure 2: Design Mode 

height of the square are given in the size 
box. These dimensions are inclusive of 
the lines of the square. 

Box Filled — Works the same as 
Square, but produces a square filled 
with the current paint color. 

Line — Place the cursor at the start- 
ing point of the desired line and move 
the joystick to position the other end of 
the line. The total length of the line is 
given at the top of the screen. 

Draw -- Place the cursor at the 
desired starting point and, while press- 
ing the firebutton, move the joystick. 

Erase — While pressing the firebut- 
ton, a blinking box erases anything in 
its path. 

Paint — Place the cursor inside the 
area to be filled. Press the firebutton, 
and the appropriate area will be 
painted. 

Type -- Position the cursor. Click 
and the text cursor will appear (a bell). 
Type your message and press ENTER. If 
you are finished with your message, 

U A C A T 1 N 



press CLEAR.otherwise press the space 
bar to continue the next line. Pressing 
SH1FT-0 simultaneously toggles between 
dark and light letters. Pressing SHIFT-© 
toggles between red and blue letters. 
Each cursor position represents one of 
BASIC'S PRINTS locations. If these do 
not correspond exactly to a desired 
location, printed text can later be 
moved, as described below. 

Circle Wall — This draws a circular 
wall of the thickness specified in the 
default menu and functions as the Circle 
command. The program begins with 
4'/i-inch walls. The dimensions given at 
the top of screen are "on center" width 
and height radii. 

Square Wall — This draws a square 
or rectangular wall and functions as the 
Square command. Again, the height 
and width are given as "on center" 
dimensions. "On center" is a standard 
architectural designation and refers to 
the distance from the center of one wall 
to the center of the opposite wall. This 
measurement is usually less than the 
whole area covered by the thickness of 
one wall in each direction. Always place 
the cursor at the position you want the 
outside edge of the wall before pressing 
the joystick to draw. 

Move — While pressing the joystick 
firebutton, enclose the area you want to 
move with the blinking square. A cer- 
tain amount of memory has been re- 
served for storing a surrounded item for 
a move. In the dimension box, the 
remaining reserved memory is given. 
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Sample printout of a vacation home design. 
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Once the reserved memory is used, a 
warning sound is heard. The message 
RRER TOO LARGE appears if you attempt 
to enclose too great an area. Once the 
desired area is enclosed, release the 
button and move the cursor to the 
approximate point you want to place 
the acquired area. Press the button 
again and, while holding it down, adjust 
the position. The old area will be erased 
when the firebutton is released. 

Copy — This works exactly like 
Move, except that the old area is not 
erased. 

Furniture -- This program is com- 
plete with pre-drawn furniture and 
fixtures that may be placed anywhere in 
your plan. Clicking on the chair icon 
will bring up the various furniture 
drawings. Move the blinking bell to the 
desired item, click and the design screen 
will appear. Clicking on Cancel returns 
you to the command mode. 

Once back in the design mode, the 
familiar dot cursor can be seen on the 
screen. Move the cursor to the approx- 
imate area in which you will place the 
selected furniture item. Press and hold 
down the firebutton to fine-adjust its 
position. Then release the firebutton 
and press the space bar to set that item. 
A door bell chime will sound to remind 
you to press the space bar. A second 
chime sounds when the space bar has 
been pressed, to let you know the item 
has been set. 

You may also rotate the furniture 
item 90 degrees by releasing the firebut- 
ton (after initially pressing it) and 
pressing it again. You can then set the 
item as described above or release and 
press the button again to rotate another 
90 degrees. This rotation feature is why 
you must press the space bar to set the 
item once it is where you want it. 

Fixtures operation is the same as with 
Furniture, except for the doors. After 
the door has been placed, but before it 
is set, you may toggle between right and 
left hinges by pressing the right arrow. 
A right or left arrow will appear in the 
upper-right comer of the screen as this 
is toggled. Make sure you press the 
space bar once you have the fixture item 
where you want it. 

Cursor Control 

One of the problems encountered in 
designing any joystick operated graph- 
ics editor is the fact that there are 256 
by 192 available points on the screen, 
but only 64 by 64 divisions recognized 
by the joystick interface. This provides 
a poor resolution — much poorer than 
we want. This problem can be solved by 



hardware (e.g., CoCo Max) or software 
as in Archie, which offers three modes 
of cursor control. 

Relative Control — This is the de- 
fault cursor mode, though it is the one 
I use least often. Basically, the cursor 
travels in the direction the joystick is 
pointing. If the joystick is at an extreme 
position, the cursor moves two pixels at 
a time. Placing the joystick closer to the 
center allows movement at a rale of one 
pixel. Bringing the joystick still closer to 
center halts the cursor. The current 
joystick values are given at the top of 
the screen (see Figure 2). 

Full Screen Immediate Control — 
This is invoked by pressing the down 
arrow key while in the design mode. 
When in this mode, the cursor can be 
placed anywhere on the screen imme- 
diately, by moving the joystick to its 
relative position. However, you will 
note there are some "in-between" posi- 
tions you cannot achieve in this way. 
Once in this mode, you may press the 
down arrow again to toggle to the 
Relative mode, or you may press the up 
arrow to switch to the Single Pixel 
Immediate mode. 

Single Pixel Immediate Control — 
Pressing the up arrow while in the 
design mode invokes this mode. Wher- 
ever the cursor is at the time this mode 
is invoked becomes the center of a 64 
by 64 pixel square. The cursor can be 
placed at any spot within the square by 
moving the joystick to its relative posi- 
tion. This allows easy fine adjusting of 
position or size. Pressing the up arrow 
while in this mode toggles back to the 
Relative mode; pressing the down arrow 
switches to the Full Screen Immediate 
mode. 

At the top of the design screen, an up 
arrow (Single Pixel Immediate), a down 
arrow (Full Screen Immediate), or a 
space (Relative) appears to advise which 
of the three modes are in force (see 
Figure 2). 

Keyboard Commands 

There are several commands called by 
keyboard input. All other keyboard 
input is ignored. 

Space bar — This actually has three 
uses: 

• Pressing the space bar in the design 
mode switches you to the command 
mode, bringing down the icon menu. 
This is the only way to call the icon 
menu. 

• Pressing it in the command mode 
switches you to the design mode, leav- 
ing in force the current function. You 



may also point and click to call the 
design mode. 

• You must press the space bar to set 
a furniture or fixture item as described 
above. Pressing it a second time calls the 
icon menu. 

Arrow keys - The up and down 
arrows change cursor control as de- 
scribed. The right arrow toggles the 
door hinges as described. 

SHlFT-down arrow — Pressed simul- 
taneously, this erases whatever you 
have done to the last click. You may 
undo anything (including a trashed 
screen), but you cannot undo an undo. 
So be careful. 

SHIFT-CLEAR - This trashes (or 
clears) the design screen. You may also 
do this from the command mode by 
clicking on the trash can icon. 

C — This is the Continue function. 
You may continue a function after 
releasing the firebutton by pressing C. 
Your old drawing (up to the last click) 
is erased and, when you press the button 
again, a new drawing appears from the 
initial starting point to the new cursor 
position. This is especially useful when 
changing cursor modes. For example, 
you may draw a large square in the Full 
Screen mode. Then release the firebut- 
ton, press C, press up arrow to invoke 
the Single Pixel mode, and then press 
the firebutton to fine-adjust the original 
large square. Continue may be used 
only while drawing with Square, Circle, 
Box Filled, Line, Circle Wall, Square 
Wall, Copy and Move. 

R — The Recall feature allows you to 
display the dimensions of the last figure 
drawn. The dimensions appear at the 
top of the screen momentarily and are 
then replaced by the current cursor 
position. Note, however, after returning 
from the command mode, pressing R 
recalls the maximum dimensions al- 
lowed at the current scale. 

P — This is a special Recall with 
Print. After the most recent dimensions 
are replaced by the cursor position (as 
described above), move the cursor to 
the approximate place you would like 
to print these dimensions on your plan 
and, while pressing the firebutton, fine 
adjust. Then release the firebutton. 

32K Modification 

Archie may be easily modified to 
operate on a 32K CoCo with Extended 
Color BASIC. On a disk system, the help 
screens must be sacrificed as well as the 
maximum area size that may be Moved 
or Copied at a time. Otherwise opera- 
tion is identical. The modification for 
32K is as follows: 
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Listing 1 

In lines 5 and 100. change 64K to 32K. 

Line 5: Change 31409 to 29209. 

Line 180: Change 31410 to 29209. 
Change 31449 to 29239. 

Change Line 185 to read: 

IBS DATA 34, 37, 30, BD, 0,19, 
10,9E,BC,31,A9,C,A0,CE,15, 
31,36,AG,A2,A7,B0,5A,2C,F9, 
10,9C,BC,2E,F0,35,B7 

Delete Line 190. 

Line 225: Change to EXEC29209 

Change Line 230 to: 

230 POKE2922?,&HB0:PDKE 
29229, 8.HR2 

Listing 2 

In lines 5 and 160, change 400 to 200 

(disk only). 

Line 225: Change 31410 to 29209. 

Change Line 365 to read: 3G5 REM (disk 

only). 

Delete lines 370 to 395 (disk only). 

Typing the Listings 

A few special characters are used in 
the listings that may need clarification. 
To generate " N \ use up arrow; for [, use 
SHIFT-down arrow; for ], use SHll-r- 
right arrow; the - is made with SH1FT- 
up arrow: and the \ with SBIFT-CLEAR. 



Also, if you are not operating a disk 
system, you will be typing in many 
commands that normal Extended Color 
BASIC will not recognize. When you 
LIST or LLIST the program, you will 
see an '"'instead of the command. Don't 
worry, however; the program is de- 
signed to prevent you from executing 
any disk commands if Disk BASIC is not 
present. 

The Hi-Rcs Character Set 

Archie uses a machine language 
generated, high resolution character set 
that may be used as a stand-alone ML 
program. To accomplish this, delete 
lines to 35 and lines 80 to 245 of 
Listing 1. Type CLEAR 200,31878 and 
run the program. When the OK prompt 
returns, save by entering (C)SAVErl 
"CHARACTR", 31879, 32767,31879. 
Or if you want to run the routine from 
basic, then add these lines: 

35 CLERR200, 31878 

B0 EXEC31B79 

85 PM0DE4,1: SCREEN1,1 

This Hi-Res character set also allows 
for screen scroll and screen clears with 
the CLEAR key or CL5 command. In 
fact, you may CLS to one of nine colors 



with standard BASIC commands. Press- 
ing SHlFT-@ simultaneously toggles 
between red and blue letters. You may 
use this with any BASIC program except 
those that use pokes to video memory 
(1024-1535), those that use the same 
memory as the program and, in some 
cases, those that use graphics memory. 
It is written in position-independent 
code and may be offset loaded. Permis- 
sion is granted to use the routine in your 
programs as long as proper credit is 
given. 

Archie is an extensive, dedicated 
graphics editor. Virtually all you need 
to create floor plans is available. How- 
ever, it is not designed to replace the 
services of a qualified architect. Before 
constructing any design, a professional 
should be consulted to assure structural 
soundness and compliance with local 
building codes. Also, like any program 
of this nature, some practice is required 
before its operation is mastered. I 
encourage you to experiment with 
Archie and make it work for you. 

( You may direct questions to the 
author at 614 East Elm Street. Rock- 
mart, GA 30153. Please enclose an 
SASEfor a reply when writing.) D 
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Listing 1: ARCHIE 

'ARCHIE 1.1, (loader), (C) 198 
6,87 BRUCE BELL, THIS PROGRAM IS 

MADE AVAILABLE "AS IS' AND IS N 
ON-WARRANTED . 

5 CLS: PRINT" ARCHIE 1.1" ,, "(C) 19 
86,87 BRUCE BELL","64K EXTENDED 
COLOR BASIC" , , , : CLEAR1000 / 3 1409 : 
PCLEAR8:DIMA(17) 

10 INPUT"WILL YOU USE THE 'HI-SP 
EED POKE'";Q$:Q=INSTR(l,Q$,"N") : 
POKE49 2 , Q : IFQ>1THEN10 
15 IFPEEK(49152)<>68THENQ$="C"EL 
SEINPUT"WILL THE PROGRAM BE LOAD 
ED FROM CASSETTE OR dISK" ;Q$ : IFQ 
$<"C"0RQ$>"D"THEN15 
20 POKE65495-Q,0:POKE253,PEEK(18 
8) :POKE254,0: '253 & 254 point to 

start of graph mem for hires ch 
aracters in ARCHIE. 
25 PMODE4,5:PCLS5:DRAW"BM6,105C0 



U50M+25 , + 50L2 5BM0 , 110U80M+40 , +8,0 
L40":POKE178,2:PAINT(2,108) , ,0 
30 DRAW"BM72,60C0U4E50U6R3D6F50D 
4H2U2H48L3G48D2G2":FORK=0TO2:CIR 
CLE(124,15+K) ,20,0, .7,0, .5:NEXT 
35 CIRCLE (255, 90) , 40 , : CIRCLE (25 
5,90) ,30,0,1, .32, .69:DRAW"BM245, 
62D56":POKE178, 1 : PAINT (250 , 90) , , 
0:SCREEN1,1 

40 FORK=31879T032767:READD$:POKE 
K,VAL("&H"+D$) :NEXT: "poke hi-res 
alpha routine 

45 DATABE,1,68,AF,8D,0,AA,B6,1,6 
7,A7,8D,0,A2,BE,1,6B,AF,8D,0,7D, 
B6,1,6A,A7,8D,0,75,BE,1 

46 DATAA1,AF,8D,0,3F,B6,1,A0,A7, 
8D,0,37,30,8D,0,7E,BF,1,68,30,8D 
, 0, 58, BF, 1,66,30,80, 0,18 

47 DATABF,1,A1,86,7E,B7,1,67,B7, 
1,6A,B7,1,A0,8 6,39,A7,8C,B1,39,0 
,0,0,0,34,13,AE,63,8C,A3 

48 DATAA9,2 6,2,8D,5,3 5,13,0,0,0, 
4D,2 6,2,86,31,80,3A,2C,FA,8B,A,3 
0,8D,0,11,30,8 6,A6,84,9E 

49 DATABC,30,89,18,0,A7,82,9C,BC 
,2 6,FA,3 9,0,FF,18,AA,55,99,24,FE 
,DB,D,6F,27, 3,0,0, 0,34, 37 

50 DATA81,C,26,2,8D,CB,81,13,26, 
2,3,FF,86,5C,A7,8C,AB,8D,10,16,0 
,A8,D,6F,27,3,0,0,0,34 
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51 DATA37,8D,2,20,6A,1F,2,DC,88, 
C4,E0,E7,8C,8E,86,C,3D,DB,89,E0, 
8C,86,D3,BC,C3,0,0,9E,88,8C 

52 DATA5,0,25,3,C3,C,0,1E,2,81,D 
,26,12,8D,18,31,A9,FE,81,1F,20,C 
5,1F,2 6,F4,31,A9,1,7F,20 

53 DATA7B,81,8,26,6,A7,8D,FF,59, 
86,20,30,8D,0,7A,81,5F,2F,6,A7,8 
D,FF,4A,80,20,8D,62,80,20,2 7 

54 DATA5,30,8,4A,26,FB,C6,8,A6,8 
,8D, 40,26, FA, 8D, 4F, 6F, 8D, FF, 2F, 
39,6D,8D,FF,2B,26,2B,9E,BC,30 

55 DATA89,17,FF,AF,8D,FF,1F,31,A 
8,Ep,lj3,AC,8D,FF / 17,2D,17,31,89, 
E8 , B8 , EC , Al , ED , A9 , FE , 7E , 10 , AC , 8D 

56 DATAFF,6, 23 , F3 , 31 , 89 , FE, 81 , 8D 
,8B, 6F,8D,FE,FA,35,B7, 6D,8D,FE,F 
3,27,1,43 / D,FF,27,1,47,A7,A4 

57 DATA31,A8,20,5A,39,34,7,C6,2, 
86,FF,8D,E5,2 6,FA,3 5,87,FF,FF,FF 
,FF,FF,FF,FF,FF,EF,EF,EF,EF,EF 

58 DATAFF,EF,FF,AF,AF,AF,FF,FF,F 
F , FF , FF , EB , EB , C9 , FF , C9 , EB , EB , FF , 
EF , C3 , BF , C7 , FB , 8 7 , EF , FF , 9B , 9 B , F7 

59 DATAEF,DF,B3,B3,FF,E7,DB,DB,E 
7 , DA , DD , E2 , FF , CF , CF , EF , DF , FF , FF , 
FF , FF , E7 , DF , BF , BF , BF , DF , E7 , FF , 9 F 

60 DATAEF,F7,F7,F7,EF,9F,FF,FF,E 
F,C7,83,C7,EF,FF,FF,FF,EF,EF,83, 
EF , EF , FF , FF , FF , FF , FF , FF , 9F , 9 F , DF 

61 DATABF,FF,FF,FF,83,FF,FF,FF,F 
F , FF , FF , FF , FF , FF , CF , CF , FF , FD , FD , 
FB , F7 , EF , DF , DF , FF , C7 , BB , B3 , AB , 9B 

62 DATABB,C7,FF,EF,CF,EF,EF,EF,E 
F,83,FF,C7,BB,FB,E7,DF,BF,83,FF, 
C7,BB,FB,E7,FB,BB,C7,FF,BB,BB,BB 

63 DATA81,FB,FB,FB,FF,83,BF,87,F 
B , FB , BB , C7 , FF , C7 , BF , BF , 8 7 , BB , BB , 
C7,FF,83,FB,F7,EF,DF,BF,BF,FF,C7 

64 DATABB,BB,C7,BB,BB,C7,FF,C7,B 
B , BB , C3 , FB , FB , C7 , FF , FF , FF , CF , CF , 
FF , CF , CF , FF , FF , CF , CF , FF , CF , CF , EF 

65 DATADF,F7,EF,DF,BF,DF,EF,F7,F 
F,FF,FF,83,FF,83,FF,FF,FF,BF,DF, 
EF,F7,EF,DF,BF,FF,C7,BB,FB,E7,EF 

66 DATAFF,EF,FF,FF,FF,FD,FB,F7,A 
F,DF,FF,EF,D7,BB,83,BB,BB,BB,FF, 
87 , BB , BB , 87 , BB , BB , 87 , FF , C7 , BB , BF 

67 DATABF,BF,BB,C7,FF,87,BB,BB,B 
B,BB,BB,87,FF,83,BF,BF,87,BF,BF, 
83,FF,83,BF,BF,87,BF,BF,BF,FF,C3 

68 DATABF,BF,B3,BB,BB,C3,FF,BB,B 
B , BB , 8 3 , BB , BB , BB , FF , 8 3 , EF , EF , EF , 
EF,EF,83,FF,FB,FB,FB,FB,FB,BB,C7 

69 DATAFF,BB,B7,AF,9F,AF,B7,BB,F 
F,BF, BF, BF, BF, BF, BF, 83 , FF, BB, 93 , 
AB , BB , BB , BB , BB , FF , BB , 9B , AB , B3 , BB 

70 DATABB,BB,FF,C7,BB,BB,BB,BB,B 



B,C7,FF,87,BB,BB,87,BF,BF,BF,FF, 
C7 , BB , BB , BB , AB , B7 , CB , FF , 8 7 , BB , BB 

71 DATA87,AF,B7,BB,FF,C7,BB,BF,C 
7,FB,BB,C7,FF,83,EF,EF,EF,EF,EF, 
EF , FF , BB , BB , BB , BB , BB , BB , C7 , FF , BB 

72 DATABB,BB,BB,BB,D7,EF,FF,BB,B 
B,BB,BB,AB,93,BB,FF,BB,BB,D7,EF, 
D7 , BB , BB , FF , BB , BB , D7 , EF , EF , EF , EF 

73 DATAFF,83,FB,F7,EF,DF,BF,83,F 
F,EF,EF,EF,EF,83,C7,EF,FF,EF,C7, 
8 3 , 8 3 , 8 3 , 1 , DF , FF , FF , F7 , F3 , 8 1 , F3 

74 DATAF7,FF,FF,EF,C7,83,EF,EF,E 
F , EF , FF , FF , EF , CF , 8 1 , CF , EF , FF , FF 
80 POKE32104,57:POKE32244,57:FOR 
K=1T04 : READD : POKED ,253: NEXT : ■ mod 
ify hires char routine for ARCHI 
E 

85 DATA 31999, 32007, 32082,32177 
95 EXEC31879:POKE253,PEEK(253)+2 
4:PRINT@202,"A R C H I E";:GET(8 
1,72) -(165, 79) ,A,G:F0RK=-1T01:PU 
T (81+K, 72+ABS (K) ) - ( 165+K, 79+ABS ( 
K) ) ,A,AND:NEXT 

100 SCREEN1,1:PRINT@253,"ARCHITE 
CTURAL FLOOR PLANNER" : PRINT@323 , 
"FOR THE 64K COLOR COMPUTER" ;: PR 
INT@393,"BY BRUCE BELL" : PRINT@45 
8, "VERSION 1.1":PRINT@492, "\ \ \ 

\":POKE2 53,PEEK(253)-24 
105 FORK=31462T031878:READD$:POK 
EK,VAL("&H"+D$) :NEXT: 'poke scree 
n dump (modified from RBOW 10.83 
, GRAFDUMP by J. PAUL FOUNTAIN) 
110 DATA86,FF,A7,8C,FA,6F,8C,F5, 
8 6,80,A7,8C,ED,6F,8C,E8,8 6,1,A7, 
8C,E9,8 6,FE,97,6F,8 6,12,AD,9F,A0 
115 DATA2,9E,BA,30,88,1F,AF,8C,C 
D , 30 , 89 , 17 , E0 , AF , 8C , C8 , 10 , 8E , , 1 
,8D,7 6,AE,8C,BD,17,0,94,17,1 
120 DATA1E,17,0,A1,30,88,20,AC,8 
C,B0,2F,EF,86,D,AD,9F,A0,2,8D,5A 
,AE,8C,A1,9C,BA,2D,66,8D,75,17 
125 DATA1,3E,17,0,82,30,88,20,AC 
,8C,91,2F,F0,8 6,D,AD,9F,A0,2,AE, 
8C,84,9C,BA,2D,51,34,20,AD,9F 
130 DATAA0,0,81,C,35,20,27,45,31 
, 2 1 , 10 , 8C , , 8 , 2F , C , 10 , 8E , , 1 , 6C , 
8D,FF,65,6C,8D,FF,63,AE,8D 
135 DATAFF,5C,30,1F,AF,8D,FF,56, 
AE,8D,FF,54,30,1F,AF,8D,FF,4E,20 
,88,8 6,1C,AD,9F,A0,2,8 6,2F,AD,9F 
140 DATAA0,2,86,80,AD,9F,A0,2,39 
,8 6,81,A7,8D,FF,3C,20,92,8 6,1E,A 
D,9F,A0,2,F,6F,39,1F,20,E7,8D 
145 DATAFF,25,EC,84,6A,8D,FF,1F, 
27,4,59,49,20,F6,39,88,FF,8A,80, 
A4,8D,FF,16,A7,8D,FF,E,6C,8D,FF 
150 DATA7,A1,8D,FF,5,26,F,E6,8D, 
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The Third Rainbow Book of Adventures 

Nineteen fascinating new Adventures from the winners of our third 
Adventure competition. Discover backstage intrigue at the London 
Theatre, attempt a daring space rescue, or travel through time to save the 
universe, and that's only the beginning! 

Challenge yourself! Put your wits to the test with Adventures like: 

Evil Crypt — Encounter bottomless pits, graves that kill, flesh-frying fires. 
Even the rocks and trees conceal dangers. 

The Professional — You're hot on the trail of international jewel thieves. 

Cleopatra's Pyramid — Perilous action along the banks of the treacherous 
Nile River. 

Johnny Zero — Fight against evil in the year 2091 as a genetic android. 
And when you're at the end of your rope, revenge is in reach with: 

Balm — You are the Adventure, determined to exterminate anyone fool 
enough to travel your cavern. 

Experience other traditional and contemporary challenges from these 
winning authors: Mark and Mike Anderson, Jon Blow, Jason Dolinsky, Matt 
Hazard, Joab Jackson, Curtis Keisler, Franklin Marrs, Ann Mayeux, Scott 
McCleary, Chris McKernan, Philip Newton, Fred Provoncha, Carlos Rocha, 
Michael Shay, Don Sheerin, and Walt Thinnes. 

The Third Rainbow Book of Adventures is only $11.95! 

Save yourself from typing listings with — the Third 
Adventures Tape or Disk Set. 

Get on with your game and eliminate typing hassles. Just load these great 
programs into your computer and run. 

Tape $9.95, Two- Disk Set $14.95 

The tape and disks are adjuncts and complements to the book; the book is necessary for 
introductory material and loading instructions. 



Please send me: The Third Rainbow Book of Adventures $1 1 .95 . 
The Third Rainbow Adventures Tape $9.95 . 



The Third Rainbow Adventures Disk Set $14.95 



Name _ 
Address 
City 



.Slate 



.ZIP. 



□ My check in the amount of 

Please charge to my: D VISA 

Acct. No. 

Signature 



is enclosed' 

D MasterCard 



D American Express 
Exp. Date . 




Mail to: The Third Rainbow Book of Adventures, The Falsoft Building, P.O. Box 385, 

Prospect, KY 40059 
To order by phone (credit card orders only), call (800) 847-0309, 8 a.m. to 5 p.m. EST. 
For other inquiries, call (502) 228-4492 

"Add $1 .50 shipping and handling per book. Outside the U.S. add $4. Allow 6 to 8 weeks 
for delivery. Kentucky residents add 5% sales tax for book and tape. In order to hold 
down costs, we do not bill. U.S. currency only please. 





FE,FD,C1,8J3,27,7,AC,8D,FE,F3,2C, 

1, 39, E6,8D,FE,EE,5D, 27,40,86 
155 DM!MC f AD f 9F f A0 f 2 f A6,8D,FE,E 

1,34,2,AB,E0,AD,9F,A0,2,A6,8D,FE 

,D7,AD,9F,A0,2,6F,8D,FE,CD,AC 

160 DATA8D,FE,C7,2D,13,A6,8D,FE, 

C6,AD,9F,A0,2,AD,9F,A0,2,86,80,A 

7,8D,FE,B7,39,A6 / 8D,FE,B3,A7 / 8D 

165 DATAFE / AE / 39 / A6 / 8D / FE,A9 / AD, 

9F,A0,2,AD,9F,A0,2,20,D0,A7,8D,F 

E,9D,A4,8D,FE,9B,E6,8D,FE,97,3D 

170 DATA68,8D,FE,92,1F,98,58,34, 

4,AB,E0,AB,8D,FE,86,A7,8D,FE,82, 

A6,8D,FE,7F,81,8,2F,11,6F,8D,FE 

175 DATA77,6C,8D,FE,73,A6,8D,FE, 

6E , 6F , 8D , FE , 6A , 3 9 , A6 , 8 D , FE , 64 , 20 

,C1,44,44,44,8D,BC,44,39 

180 FORK=31410TO31449:READD$:POK 

EK,VAL("&H"+D$) :NEXT: 'poke icon 

menu mover 

185 DATA34,37,8E,80,1,10,9E,BC,3 

1 , A9 , C , A0 , C6 , 15 , 3 1 , 3 6 , A6 , A2 , 1A , 5 

0,7F,FF,DF,A7,80,7F,FF,DE,1C,AF 

19JS DATA5A,2C,EF,10,9C,BC,2E,E6, 

35, B7 

195 PMODE4,l:PCLS5:PMODE3,l:FORY 

=2T074STEP24 : DRAW"BM8 , =Y ; " : FORI= 

1TO8:DRAW"C6R20D20L20U20BR20":NE 

XTI , Y : PMODE4 , 1 : CIRCLE ( 18 , 12 ) , 6 , 

: CIRCLE (18, 36), 6, p: CIRCLE (18,36) 

, 2 , : CIRCLE ( 118 , 6j3) , 6 , j3 : DRAW" BM1 

14,64Cj3E8" 

200 POKE178,250:LINE(52,18)-(64, 

6) , PSET, BF: DRAW"BM3 2 , 18C0U12R12D 

12L12 BR40E12 BR17NG9F3G2NH3G7NH 



3L3NU3 BR20U3E7R5ND3G7NL5D3NE7L5 
BR21EU8R3U4R2D4R3D2NL8D6GL8 BR2 
2H3U8ERFD3ND2R3ND2R3ND2R2FD4G3 B 
M32 , 42U12R12D12L12BE4U4R4D4L4 » 
205 DRAWBR16BD2U8R8D5ND3R2F2NL4 
DL2NDL4NDL4NDL2 BR20BD2U12F6NG6U 
6F6G6U6 BR16BD6U4R3ND2R3ND4E2L6N 
G2U4NUR6NUD2NL6D6 BR11BDEFGHBU3U 
2ER4EU2RU2NL2RNR2D2RD10L3U5L3DL2 

BR21BD4 
210 DRAWE10H3G3NFG2NFG2NFG3F3 B 
R17U11ER12GD11L12BE2U0BU3U0BU3U0 
BU3U0BR8D0BD3D0BD3D0BD3D0 BM12,6 
6U12R12D2L2D2R2D8L12BE4BR2H2E2F2 
G2 BR14BD3NR12U2NR12U6ER10FD8BH5 
EFGHBL4EFGH" 

215 DRAW"BR17BD6U8NER6NH4NE4R5ND 
8ENL11D8GL11BE3U2ER3FD2GL3H BR19 
BU6U2ER6FD2G2D3BD2D2L3U2R3BU2L3U 
3E1U2LDL2 BR17BD7NF2U7E3R5F4D4G2 
L2G2L4BEBU2EFGHBU4U0BE2BLU0BR3U0 
BF2U0" 

220 DRAWBR40D5BL3U5BL3D5BG2R10E 
U8NL12H2L4NUL4G2D8F BR19BU2U6ER5 
UEND2F5G5NUGU2L6ER5" 
225 EXEC31410 

230 FORK=31426T031439:READD$:POK 
EK,VAL("&H"+D$) :NEXT:DATA 1A,50, 
7 F , FF , DF , A6 , 80 , 7F , FF , DE , 1C , AF , A7 
, A2:'poke icon put 

23 5 FORK=5T08:PCOPYK TOK-4:NEXT: 
SCREEN1 , 1 : PRINT@0 , " " ; : POKE65494 , 



245 IFQ$="C"THENCLOAD"ARC"ELSELO 

AD"ARC.BAS" ,R 



^40 


...111 


375 ... 


....80 




' 85 . . . 


....73 


405 .. . 


...140 




145 .. 


...175 


450 


...79 




175 .. 


...167 


475 


...142 




215 . . 


...15 


525 


...232 




260 .. 


...105 


550 


....41 




310 .. 


...184 


640 .. . 


...243 




340 . . 


...157 


END .. 


...172 









Listing 2: ARC 

'ARCHIE 1.1 (main module), (C) 
19 86 BRUCE BELL, THIS PROGRAM I 
S MADE AVAILABLE 'AS IS' AND IS 
NON-WARRANTED. 

5 DIMA(2) ,B(400) ,N$(22) : DEF FND ( 
S)=INT(WW*S/12-.5) :DEF FNJ(H)=(A 
BS(H)-1)*SGN(H) 

10 D$(0)="ARCHIE ":D$(1)="B. BE 
LL ":D$ (2) ="02/10/87" :M$="CIRCLE 
SQUAREBOXFILLINE DRAW ERASE PA 



INT TYPE CIRWALSQRWALMOVE COPY 

FURN FIX SCALE PRINT DISK 
CASSETSCREENHELP PALETEDEFALTTR 
ASH END " 

15 SP$=» *[":U$=" ###X### ":ME$= 
CHR$ ( 34 ) : S=4 : SS=3 : M=2 : PC=1 : CP=0 : 
PP=10:SC=1:WW=4.5:PQ=PEEK(492) :G 
=PEEK(188)*256:G1=PEEK(2 53) :G2=G 
1+24 

20 PMODE4 , 5 : PCLS5 : PMODE4 , 1 : PCLS5 
: DRAWBM50 , 50C0U6F6L3M+2 , +4LM-2 , 
-4 L2 " : PAINT (52, 48), 0,0: GET ( 50 , 4 4 
) -(56,54) ,A,G:PCLS5:SCREEN1,1 
25 POKE65495-PQ,0 

30 POKE178,PC:LINE(192,0)-(204,7 
) , PSET , BF : PRINT§26 , MID$ (M$ , 1+6* ( 
M-l) ,6) ; :PRINT@2 3,MID$(SP$,SP+1, 
1) ; :COLOR5,0 

35 POKE255, 255 :PRINT§9, USING" ##. 
# "+ME$ ; SS ; : POKE255 , : XM=0 : YM=8 : G 
OSUB200 : PSET (X, Y , C) : IFQ$=" "THEN6 
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• SECRETS REVEALED 



An introduction to the Color Computer III that compares the 
differences between the CoCo I/II and the NEW CoCo III. Includes: 
GIME chip specs, CoCo II to CoCo III converter, CoCo III memory 
map and a 128K/512K RAM test. "Offers some very good information 
to programmers . " - Rainbow Review Feb '87 $19.95 



• C III GRAPHICS I 



^Buy 'em both 



for $29.95 



I 



Products! 



INSIDE 
OS9 LEVEL II 

With over 100+ pages, it is a must BOOK 
for ANYONE interested in LEVEL II. Has 
FIXES for KNOWN BUGS, how to convert a 
$29.95 ROGUE disk into a WORKABLE LEVEL 
II disk, WINDOWS, tips, tricks and many 
things that TANDY left out!! ! $39.95 
WIZ - LEV. II Term'l pgm w /windows $79.95 



A drawing program for the CoCo III using the new Enhanced graphic 
features: 320x192 graphics, 16 of any 64 colors, plus the ability 
to Save and Load 32K screens. "Paint pretty pictures on the 
CoCo3 ." - Rainbow Review Dec '86 $19.95 

• ROLLER CONTROLLER 

Meet the challenge of super fast arcade action using the brilliant colors of the CoCo III. Six completely dif- 
ferent maddening mazes with progressive skill levels. 128K DISK $29.95 (see Rainbow Review May '87) 

• COCO III UNRAVELLED - It's here !!! 

Provides a COMPLETE COMMENTED DISASSEMBLY of the new code in the CoCo Ill's ROM ! ! ! $29.95 

• ELITEWORD 80 - #1 COCO III Word Processor 

The third generation CoCo Word Processor is here! All the powerful features, advantages and benefits of 
EliteWord plus 40/80 column display formats for the CoCo III . Available only from Spectrum Projects! $79.95 
Special word processing package of EliteWord and EliteSpel for $99.95 (see Rainbow Review March '87 page 134) 

• FKEYS III - Function Keys for the COCO III 

A productivity enhancement that gives you the capability to add twenty (20) pre-defined functions to the CoCo 
III by using the CTL, Fl and F2 keys! $24.95 "Get more from your keyboard with FKEYS III" (4/87 Rainbow Review ) 

• 51 2K UPGRADE (NOW $79.95*1 ^mcli 1 !!! 

Easy installation with a superior design for a reliable upgrade, processing efficiency and AVAILABLE NOW for 
the CoCo III! (» $79.95 when purchased with our 512K RAM DISK program for $19.95) A 512K upgrade without RAM 
chips $39.95 - The lowest upgrade prices in the Rainbow magazine, period! ! ! 

• RGB PATCH - No more BLACK & WHITE dots ... 

Did you buy an expensive RGB monitor ( CM-8 ) just so that you could see your Hi -Res artifact ing CoCo 2 game.'; in 
BLACK 6 WHITE ??? RGB PATCH converts most games to display in COLOR on an RGB monitor. 128K DISK $24.95 

. COCO III FONT BONANZA - -&"&-&"& "atW 

Replace the ' PLAIN ' CoCo III characters from a menu of INCREDIBLE fonts or create your own. 128K DISK $29.95. 
NEW! ! ! FONT DISK ftl with over 25 more FONTS ! $19.95/Buy 'em both for $39.95. *(4/87 Rainbow Review ) 

• RGB MONITOR - Better than TANDY CM-8 ! 

Our monitor is much more versatile than the Tandy CM-8 ! Takes a variety of video inputs, including: RGB 
Analog, Color Composite and RGB TTL. Unlike the CM-8, PMODE 4 artifact colors don't show up 3LACK and WHITE 
(when processed through the Color Composite input) $329.95. Magnavox 8515 w/ CoCo III cable $339.95 

• PAL SWITCHER - Designed by Marty Goodman! 

Have the best of both worlds by being able to switch between CoCo II and CoCo III modes when using a Multi-Pak 
Interface. Req. OLDER PAL & NEW PAL chip for the 26-3024 Multi-Pak Interface $29.95/with NEW PAL chip $39.95 



CoCo III Multipak PAL chip $19.95 
Guide to CoCo III Graphics $21.95 
Better Graphics on CoCoIII $24.95 



CoCo III Service Manual $39.95 
Video Digitizer III ! ! $149.95 
512K CoCo III Computer $299.95 



All orders plus $3 3/H (Foreign $5) - COD add $2 extra - NYS Residents add Sales Tax 
Most orders shipped from stock. Allow 1-3 weeks for processing backorders. 



PO BOX 264 

HOWARD BEACH NY 11414 

COCO HOT LINE 71B-835-1344 



5ELSEIFQ$="\"THENC=5:GOTO330ELSE 
IFQ$=" [ "THENC=5 : GOTO60ELSEIFQ$=" 

»THENC=5:G0SUB23 5:GOT0295 
40 IFQ$O"R"ANDQ$o"P"THEN50ELSE 
GOSUB285 : F0RT=1T0999 : NEXT : IFQ$=" 
P M THENGET ( 80 , ) - ( 18 4 , 7 ) , B , G : GOSU 
B2 35 : GOSUB200 : Z=1ELSE50 
45 GOSUB230:PUT(X1,Y1)-(X1+104,Y 
1+7 ) , B, AND : GOSUB200 : IFZ=2THENZ=0 
:GOT035ELSE45 

50 IFQ$=" A "THENSP=(SP+1)AND1:X3= 
XI : Y3=Y1 : GOTO30ELSEIFQ$=CHR$ ( 10 ) 
THENSP= (SP+2 ) AND2 : GOTO30ELSEIFQ$ 
="C"THENCN=1 : GOSUB230 
55 GOT03 5 

60 GOSUB230:GOTO30 

65 GOSUB2 35:ONM GOTO70 , 90 , 90 , 90 , 
115,125,135,140,70,90,155,155,18 
0,180 

70 IFCN=0THENX=X1:Y=Y1 ELSECN=0 : 
X=X2:Y=Y2 

75 X2=X:Y2=Y:YM=8:Z=l:POKE253,G2 
:D=FND(S) 

80 W=ABS(X-X1) :IFW=0GOSUB200:GOT 
O80ELSEHW=ABS(Y-Y1)/W: CIRCLE (X,Y 
) ,W,0,HW:IFM=9ANDW>=D THENCIRCLE 
(X,Y) ,W-D,0,HW 

85 GOSUB265:GOSUB200:IFZ=2THENZ= 
: POKE2 5 3 , Gl : GOT03 5ELSEGOSUB2 30 : 
GOTO 80 

90 IFCN=0THENX=X1:Y=Y1 ELSECN=0 : 
X=X2 : Y=Y2 

95 X2=X : Y2=Y : YM=8 : Z=l : POKE2 53 , G2 
:D=FND(S) 

100 IFM=4THENLINE(X,Y)-(X1,Y1) ,P 
RESET ELSE IFM=3THENPOKE178 , PC: L 
INE(X,Y)-(X1,Y1) ,PSET,BF ELSE LI 
NE(X,Y)-(X1,Y1) , PRESET, B 
105 IFM=10ANDD>0THENDX=SGN(X1-X) 
*D : DY=SGN ( Yl-Y) *D : LINE (X+DX , Y+DY 
)-(Xl-DX,Yl-DY) , PRESET, B 
110 GOSUB265:GOSUB200:IFZ=2THENZ 
=0 : POKE253 , Gl : C=PPOINT (X, Y) : GOTO 
35ELSEGOSUB230:GOTO100 
115 YM=8:Z=1 

120 X=X1 :Y=Y1: PRESET (X, Y) :PRINT@ 
10 , USINGU$ ; X , Y : GOSUB200 : IFZ=2THE 
NZ=0 : GOTO35ELSE120 
125 XM=2:YM=10:Z=1:COLOR0,5 
130 GOSUB200:LINE(Xl-2,Yl-2)-(Xl 
+2 , Yl+2 ) , PSET , BF : PRINT@ 10 , USINGU 
$;Xl,Yl:LINE(Xl-2,Yl-2)-(Xl+2,Yl 
+2 ) , PRESET , BF : IFZ=2THENZ=0 : C=PPO 
INT(X,Y) :GOTO35ELSE130 
135 P0KE178,PC:PAINT(X1,Y1) , ,0:C 
=PP0INT(X1,Y1) :POKE178,3:GOT035 
140 IFYl>180THEN30ELSEP=Xl/8+Yl+ 
Yl/6*10 



145 PRINT@0, "PRESS <ENTER> AT EN 

D OF THE LINE"; : PRINT@P, "" ; : LINE 

INPUTS? : IFP>479THEN30ELSEPRINT(?0 

,"<CLEAR> TO QUIT:<SPACE> TO CON 

T."; 

150 Q$=INKEY$ : IFQ$=""THEN150ELSE 

IFQ$=CHR$ (12 ) THEN30ELSEIFQ$=" "T 

HENP=P+3 2:GOT0145 

155 YM=8:Z=1:IFCN THENCN=0 : X=X2 : 

Y=Y2 : GOT017 5ELSEPOKE2 5 3 , G2 : X=X1 : 

Y=Y1 

160 GOSUB2 30:GOSUB200:IFZ=1THENP 

OKE179 , 53 : LINE (X, Y) - (XI , Yl) , PRES 

ET,B:X2=INT(400-(ABS(X-X1)+1)*(A 

BS ( Y-Yl) +1) /40) : PRINT@16 , X2 : IFX2 

<0THENPLAY"L255O1A":GOTO160ELSE1 

60 

165 POKE253,G1:IFX2<0THENPRINT@1 

4, "AREA TOO LARGE! ";: SOUND100 , 1 : 

FORT=1TO500 : NEXT : Z=0 : GOTO30 

170 X2=X:Y2=Y:GET(X,Y)-(X1,Y1) ,B 

,G: LINE (X, Y) - (XI, Yl) , PSET, B: DX=X 

1-X : DY=Y1-Y : X1=X : Y1=Y : XM=ABS ( ( DX 

-ABS(DX) )/2) :YM=ABS((DY-ABS(DY)) 

/2)+8:GOSUB200:Z=l 

175 GOSUB200:GOSUB230:PUT(X1,Y1) 

-(X1+DX,Y1+DY) ,B,AND:IFZ=1THEN17 

5ELSEZ=0 : IFM=11THENLINE (X2 , Y2 ) - ( 

X2+DX , Y2+DY) , PSET , BF : PUT ( XI , Yl ) - 

(X1+DX,Y1+DY) ,B,AND:GOT035ELSE35 

180 Z=l:POKE253,G2:PRINT@31,CHR$ 

(95-0) ;:C=0 

185 X=X1:Y=Y1:DRAW"BM=X; ,=Y;C0S= 

S;A=A;":ONW GOSUB620, 625 , 630 , 635 

,640,645, 650, 655, 660, 6 65, 670, 680 

,685,690,695,700,705,710,715,555 

,555,555,555,555,565,570,575,580 

,580,585,590,595,600,605,610,610 

, 615 , 615 : DRAW"S4A0" 

190 PRINT@14,USINGU$;X,Y; :G0SUB2 

00 : IFZ<2GOSUB230 : GOT018 5ELSEPLAY 

"03L9GE" : C=PPOINT (X, Y) : GOSUB200 : 

IFQ$=CHR$ ( 9 ) THENO= (0+2 ) AND2 : PRIN 

T@31,CHR$(95-0) ; :GOSUB2 30 :G0T018 

0ELSEIFQ$=" "THENZ=0:POKE2 53,G1: 

PLAY"L40CDEFGABO4C" : GOTO30 

195 IFQ$=" [ "THENZ=0 : POKE253 , Gl : G 

0SUB2 30 : GOTO30ELSEGOSUB2 30 : A= ( A+ 

1) AND3:GOTO180 

200 H=JOYSTK(0) :V=J0YSTK(1) : PRIN 

T@0,H;V:IFM=8THENH=INT(H/2) :V=IN 

T (V/4 . 3 ) +1 : X1=H*8 : Y1=V*12 : G0T02 1 

5ELSEIFSP=2THENX1=INT(H*4.06) : Yl 

=INT (V*2 .91) +8ELSEIFSP=1THENX1=X 

3+H-3 2:Yl=Y3+V-3 2ELSEH=INT(H/9.2 

) -3 : H=FNJ (H) : V=INT ( V/9 . 2 ) -3 : V=FN 

J(V) :X1=X1+H:Y1=Y1+V 

205 IFXKXM THENX1=XM:H=0ELSEIFX 
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SUPER CHIP -SALE- ... 

2764 EPROM 54.95 27128 EPROM $6.95 

6821 Standard PIA :SS»85: $6.95 

Basic ROM 1.1 Chip:S2a^&. $9.95 

6847 VDG Chip-SiSWgr $12.95 

6809E CPU Chip:2i9»9&: $12.95 

CoCo III Multipak - "NEW" PAL chip (For Gray and 

White 26-3024 models ONLY) $19.95 

Basic ROM 1.3 ( Newest version) $19.95 

68766 EPROM - (Fits all Basic ROMS) $19.95 

Disk ROM 1.1 - (Needed for CoCoIII ) $29.95 

Original SAM Chip (6883 ) $29 .95 

Ext Basic Ul ROM - NEW LOW PRICE $29.95 

CoCo First Aid Kit - includes two PIA's, 6809E CPU 

and SAM Chips (BE PREPARED) $49.95 

EPROM Programmer - uses 2716s up to 27512s ! Super 
fast programming! - See April '86 review .$149.95 

COCO LIBRARY ... 

A History of the CoCo / 1980-1986 $6.95 

CoCo Memory Map Reg.^i&c95rNow only $9.95 

New! 200 MORE Pokes, Peeks 'N Execs $9.95 

Basic Programming Tricks Revealed $14.95 

500 Pokes, Peeks 'N Execs $16.95 

A Guide to CoCo III GRAPHICS $19.95 

Basic 09 Tour Guide $19.95 

Better Graphics on CoCo3 w/2 disks $24.95 

New! New! CoCo II Service Manual (Specify CoCo II 

Catalogue model number) $29.95 

CoCo III Service Manual $39.95 

The Complete Rainbow Guide to 0S9 $19.95 

Guide with Two Disk Package of demo pgms ...$49.95 
Color / Extended / Disk Basic Unraveled - A completely 
conmented disassembly of the CoCo ROMS ! $49.95 

MORE GOOD STUFF ... 

WICO Adapter - Hookup 2 Atari type joysticks. $19. 95 
CoCo Keybd - Low profile, fits all CoCo lis S "F"s 
WAS $39.95 - NOW $19.95. D/E CoCo I adapter $12.95 
WICO Trackball - Regularly $69.95 , Now only. $24. 95 
Universal Video Dryr- All monitors £ CoCos .$29.95 
(2) Chip 64K Upgrade - 26-3134 A/B CoCo II .$29.95 

28 pin Bet Basic - 26-3134 A/B CoCo II $34.95 

Ccmputize "Y" Box - Better than a Y cable ..$39.95 

KAMELEON Parallel Printer Interface $49.95 

Top FD-501 Drive 1 (#26-3131) - SAVE $60 ..$139.95 

CoCo III DISK DRIVE $239.95 

AVATEX 2400 Modem (Great for Delphi ) $249.95 

512K COLOR COMPUTER III $299.95 

All orders plus $3.00 S/H (Foreign $5.00) 
COD add $2.00 extra 
NYS Residents add Sales Tax 



COCO CABLES AIMD ... 

Printer / Modem 15' Extender Cable $14.95 

Tired of unplugging devices from your RS232 port? 

Try a RS232 "Y" Cable $19.95 

TANDY CM-8 RGB Analog 6'Video Ext Cable $19.95 

Disk Drive Cable (34pin - 34pin) $19.95 

Cassette 'Y' Cable - Connect a 26-3028 Hi -Res Joy - 
stick interface S Tape Recorder to CoCoIII .$19.95 

Modem Cable - 6ft (DB25-DB25) $19.95 

Joystick / Mouse 10' Ext Cable $19.95 

Dual Disk Drive Cable (3-34pin) $24.95 

MAGNAVOX 8505 / 8515 Analog RGB cable $24.95 

Other Analog RGB monitor cable ( Specify ! ) ..$39.95 
15" Multi-Pak / Rom Pak Extender - Move your Multi- 
ROM Paks further away $29.95 

40 Pin Dual "Y" Cable - Hook up a Disk with a 

Voice Pak, Word Pak, CoCo Max, etc $29.95 

Triple RS232 Switcher - Now easily select any one 
of three RS232 peripherals $39.95 

OTHER GOOD STUFF ... 

5 1/4 " Diskettes in any quantity 49 cents 

C-10 tapes in any quantity 59 cents 

Rompak w/Blank PC Board 27xx series $9.95 

"D" Rev motherboard w/o socketed chips $16.95 

Video Clear - This cable will reduce TV interfer- 
ence created by CoCo! $19.95 

The Magic Box - Load Mod I/III Basic program tapes 

into the CoCo $24.95 

Deluxe RS-232 PAK -^3&^STNow only $29.95 

DOS Switcher - Select from any two DOSs (Disk 1.0 

1.1, JDOS) in a JSM disk controller $29.95 

256K RAM Chips (Set of 8) $39.95 

HJL-57 Keyboard - CoCo III version! Comes complete 
with special FREE Function Key Software ....$59.95 

HDS Controller w/1.1 ROM (SAVE$20) $79.95 

Super Controller - Up to 4 DOSs by a POKE ..$99.95 
1200 Baud Modem (Hayes compatible) Auto-dial/answer 
$139.95. Req's Modem cable ( 4pin or DB25 ) ..$19.95 
PBH-64 - A ccmbo Parallel Printer interface S 64K 

Print Buffer! COMPUTE while you PRINT $149.95 

Amdek Drive System with controller $239.95 

GEMINI Printer - 120cps, NLQ mode $249.95 

MAGNAVOX 8505 RGB Analog monitor $249.95 

SPECTRUM PROJECTS 
PO BOX 264 
HOWARD BEACH MY 11414 

COCO HOT LINE 

718-835-1344 
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1>255THENX1=255 : H=0 

21(5 IFYKYM THENY1=YM: V=0 ELSEIF 

Y1>191THENY1=191:V=0 

215 Q$=INKEY$:PK=PEEK(652 80) : IFQ 

$<>""ORPK=12 60RPK=254THENRETURNE 

LSEIFZ=1THENZ=2 : RETURN 

220 PSET(X,Y,C) :X=X1:Y=Y1:C=PP0I 

NT(X,Y) :PSET(X,Y,C+1) :PRINT@14,U 

SINGU$;X,Y; :GOTO200 

225 PRINT@256,STRING$(21,32) : EXE 

C31410:DRAW"BM5,0C0R166D104L166N 

U104BR4DR163U101C5RD102L164":GOS 

UB240 : G0SUB3 60 : RETURN 

2 30 FORI=5T08:PCOPYI T0I-4:NEXT: 

C=PPOINT(X,Y) : RETURN 

23 5 F0RI=1T04:PC0PYI T0I+4:NEXT: 

RETURN 

240 IFME THENSS=30.48/S:ME$="C"E 

LSESS=12/S:ME$=CHR$(34) 

245 PRINT@257,USING"##.#"+ME$+ H ] 

" ; SS ; : DX=2 56 : DY=184 : PP=2 64 : GOSUB 

275 :PP=9: RETURN 

250 PRINT@0,D$(0) ; : PRINTTAB (27) " 

="; :PRINTUSING"###"+ME$;8*SS; : PO 

KE17 8 , : LINE ( 200 , ) - ( 208 , 7 ) , PSET 

, BF : RETURN 

255 DRAW"BM0,9C0R90D112L90":COLO 

R5 : LINE ( 1 , 10 ) - ( 8 9 , 120 ) , PSET , BF : P 

OKE255,255:PRINT@33,D$(0) ; :POKE2 

55,0: RETURN 

2 60 H=JOYSTK(0) : V=INT (JOYSTK ( 1) / 

8) :K=V*32+64:PRINT@K,"\" ; : PK=PEE 

K(65280) :IFPK=2550RPK=127THENPRI 

NT@K," ";:GOTO2 60ELSERETURN 

265 IFJ THENPRINT@14,USINGU$;X1, 

Yl ; : RETURNELSEIFM=4THEN2 80ELSEDX 

=(ABS(X-X1)+1) :DY=(ABS(Y-Y1)+1) : 

IFM<9ORM>10THEN275ELSEDX=DX-S*WW 

/12 : IFDX<0THENDX=0 

270 DY=DY-S*WW/12:IFDY<0THENDY=0 

275 DX=DX/S:DY=DY/S:IFME THENXF= 

DX* . 305 : YF=DY* . 305 : GOTO290ELSEXF 

=INT(DX) :XI=(DX-XF) *12 : YF=INT (DY 

) :YI=(DY-YF)*12:GOTO290 

280 DX=((ABS(X-X1)+1)/S) A 2:DY=(( 

ABS (Y-Yl) +1)/S) A 2 : DX=SQR(DX+DY) : 

XF=INT(DX) :XI=(DX-XF)*12:PRINT@1 

0, USING" ###■## ";XF,XI; 

28 5 IFM=4THENIFME THENPRINT@10 , U 

SING" ###.## ";XF*.305+XI*.0 

25 :RETURNELSEPRINT§10, USING" 

###'## ";XF, XI: RETURN 

290 IFME THENPRINT@PP,USING"###. 

##X###.##";XF;YF;:RETURNELSEPRIN 

T@PP,USING"### ' ##X### • ##" ;XF,XI, 

YF,YI; : RETURN 

295 GOSUB225 

300 GET(XX,YY)-(XX+6,YY+10) ,B,G: 



PUT(XX,YY)-(XX+6,YY+10) ,A,AND:Q$ 
=INKEY$ : IFQ$=" "THENP=M-1 
305 Q$=INKEY$:IFQ$=" "THENP=M-1 
310 PK=PEEK(65280) :IFQ$=" "ORPK= 
126ORPK=254THENPLAY"L50O4C" : IFP< 
12THENM=P+1 : GOTO60ELSEIFP>2 3THEN 
320ELSEPUT (XX-8 , YY-15) - (XX+8 , YY+ 
3) ,B,NOT:ONP-ll GOTO520, 530 , 515, 
495,405,410,400,3 65,3 55,3 3 5,3 30, 
325 

315 H=INT(JOYSTK(0)/8) :V=INT(JOY 
STK(1)/16)*8:P=H+V:IFP=P1 THEN30 
5ELSEPUT(XX,YY)-(XX+6,YY+10) ,B,P 
SET : XX=H*20+18 : YY=V*3+18 : P1=P : GO 
TO300 

320 PC=CP+P-24:POKE178,PC:LINE(l 
92,0)-(204,7) , PSET,BF:IFM=30RM=7 
THEN60ELSE315 

325 POKE65494,0:SCREEN0,0:CLS8:P 
RINT"you can continue by typing" 
,"CONT <PRESS ENTER>", , , "or you 
can cold start by typing POKE113 
,0:EXEC40999 <ENTER>", , , "BYE-BYE 
! ":END:POKE65495-PQ,0:SCREEN1, 1: 
GOSUB230:GOTO295 
3 30 PCLS5:GOTO30 

335 POKE255 , 255 : PCLS5 : PRINT@0 , "D 
EFAULT MENU": PRINT: PRINT" FILENA 
ME: "D$(0)," DESIGNER: "D$(l)," 
DATE: "D$(2),," WALL:"; : IFME THE 
NPRINTUSING" ## . ## CM" ;WW*2 . 54ELS 
EPRINTWW"IN" 

340 PRINT" AUTO SIZE: "MID$("ON 
OFF",J*3+l,3) , ," LPRINT I.D.: "M 
ID$("YESNO ",L*3+1,3)," MEASURE: 
"MID$("U.S. METRIC", ME*6+1, 6) , 
" RETURN": POKE 2 5 5,0 
345 GOSUB2 60:IFV<4THENPRINT@K+20 
, "" ; : IFV<3THENINPUTD$ (V) : D$ (V) =L 
EFT$(D$(V)+STRING$(8,32) ,8) : GOTO 
3 3 5ELSEINPUTWW : IFME THENWW=INT ( W 
W*39.37+.5)/100:GOTO3 35ELSE3 35 
3 50 IFV=7THENGOSUB2 30 : GOT02 9 5ELS 
EIFV=4THENJ=(J+1)AND1:G0T03 35ELS 
EIFV=5THENL= ( L+l ) AND1 : GOT03 3 5ELS 
EME= (ME+1 ) AND1 : GOT03 3 5 
355 CP=INT (JOYSTK (0 ) /2 ) *8:GOSUB3 
60:PK=PEEK(65280) : IFPK=2 550RPK=1 
27THEN355ELSE295 

3 60 V=CP:FORH=13TO162STEP20:POKE 
178 , V: LINE (H, 79) - (H+10 , 89) , PSET, 
BF : V=V+ 1 : NEXT : RETURN 
365 PCLS5:PRINT§24,"COMMAND"TAB( 
57) "MODE:":PRINT@2 4 6,"_ COLORS "T 
AB(54)"_ IN/PIX &"TAB(24) "MAX SI 
ZE " : GOSUB2 2 5 : FORK=0TO2 3 : PRINT@ 3 2 
2+K*8,MID$(M$,K*6+l,6) ; :NEXT:DRA 
W"BM9 , 116C0R240D74L240NU74BR4DR2 
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<«« COLORFUL UTILITIES >»» 

MULTI-PAK CRAK 

Save ROMPAKs to your 64K Disk system using the RS Multi-Pak Interface. Eliminate constant plugging in of ROMPAKs now by 
keeping all your PAK software on disk . Includes POKES for " PROBLEM " ROMPAKs- including the NEW 16K PARS! (Demon 
Attack, Dragons Lair,etc) Now CoCo III compatible! (Upgrade $15 w /proof of purchase ) $29.95 

TELEPATCH III 

All the FEATURES of TET.BPATCH plus the classically proportioned characters of the WIZARD with TRUE lowercase! Now CoCo 
III compatiblel (Upgrade S15 w /proof of purchase ) $29.95 

DISK UTILITY E.1A 

A multi - featured tool for USER FRIENDLY disk handling. Utilize a directory window to selectively sort, move, rename and 
kill file entries. Lightning fast Disk I/O for format , copy and backup. Examine contents of files, the Granule Table, 
plus the size, load addresses and entry points of all programs. Single command execution of both Basic and ML programs. 
32K/64K DISK $29.95 Now also CoCo III compatible! Upgrade only $15 w/ proof of purchase , (see Oct'84 Rainbow Review) 

SPECTRUM FONT GENERATOR 

Write files using any CoCo Word Processor (Telewriter-64 , VIP Writer, etc.) and convert them to special Highly Detailed 
character sets ! Some of the sets supported are Italics , Old English , Futuristic and Block . A character set editor is 
included to create or modify custom sets! Supports most dot - matrix printers! DISK $29.95 (see Dec '85 Rainbow Review) 
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COCO III SOFTWARE BONANZA PACKAGE 



Create an instant library of Spectrum Projects TOP CoCo III software! I ! Get FONT BONANZA, FONT DISK #1, FKEYS III, C III 
GRAPHICS, CoCo III UTILITIES and FASTDUPE III (a $150 plus value ) for only $49.95111 

CoC^te I*' COCO GRAPHIC DESIGNER 

Create custom greetings for any occasion: Birthdays, Anniversaries, Holidays, etc. Also BANNERS S SIGNS ! Includes 
" GRABBER " utility - capture Hi -Res CoCo screens for your GRAPHIC LIBRARY! Easy to use S comes with a set of pre -drawn 
graphics. Includes a screen S font editor. 32K DISK $29.95. PICTURE DISK #1 $19.95. Colored PAPER PACKS $19.95 

64K DISK UTILITY PACKAGE 

Take advantage of an expanded 64K machine. Make an additional BK of RAM available by relocating the Ext Basic ROM from 
$8000 to $0300 . Copy ROMPAKS to disk (even " protected " PAKS) and create a 32K SPOOL buffer for printing. DISK $24.95 

TAPE/DISK UTILITY 

A powerful package that transfers tape to disk and disk to tape automatically. Does an automatic copy of an entire disk 
of programs to tape. Ideal for Rainbow On Tape to disk. Also copies tape to tape S prints tape & disk directories. 
TAPE/DISK $24.95 (see Sept '83 Rainbow Review) 

COCO III UTILITIES 

Terrific utility support programs for the new Color Computer III ! Includes a CoCo II to CoCo III converter, 32K Hi-Res 
screen saver, 40/80 column Word Processor, RAM tester, DEMO BALL generator, SMOOTH scrolling demos. 128K DISK $24.95 

THE OS-S SOLUTION 

NOW, a program that creates a " USER FRIENDLY " environment within OS-9! The OS-9 SOLUTION replaces 19 of the old " USER 
HOSTILE " commands with single keystroke, menu driven commands. No more complex long pathnames or remembering complicated 
syntaxes! Set all XMCOE parameters at the touch of keysl $39.95 New LOW pricel 1 1 $24.95 ( OS-9 Level II compatiblel 1 1 ) 

SOFTWARE BONANZA PACKAGE 

Create an instant library of Spectrum Projects TOP Colorful Utility software. Select any of the following 12 programs to 
customize your own SPECTACULAR SOFTWARE BONANZA I CoCo Checker, Multi-Pak Crak, CoCo Screen Dump, Disk Utility 2.1, 
Spectrum Font Generator, Tape/Disk Utility, Fast Dupe II, 64K Disk Utility, Spectrum DOS, CoCo Calendar, Schematic 
Drafting Processor, OS-9 Solution, Basic Plus, EZ Base or Blackjack Royale (a $300 plus value ) for only $99.95111 
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BUY ANY TWO - COCO POTPOURI - SAVE 10°/o 

CoCo Checker ....$19.95 Fastdupe III ...$19.95 Wizard's Castle ..$27.95 Spectrum DOS ...$29.95 

MIKEY-DIAL $19.95 GRAPHICOM $24.95 Color FORTH $29.95 Spit'N'Image ...$34.95 

CoCo Calendar ...$19.95 EZ Base $24.95 Adv Generator ....$29.95 CoCo Util II ...$39.95 



All U.S. orders plus $3 S/H (Other $5) 
COD add $2 extra 
NYS Residents add Sales Tax 
CoCo HOT LINE 718-835-1344 HOWARD BEACH NY 11414 



37U71":GOSUB3 95 

3 70 PCLS5:PRINT@0, "KEYBOARD INPU 
T:"TAB(24) "DESIGN"TAB (57) "MODE:" 
TAB(32) "<SHFT>-<[>= UNDO", "<SHFT 
>-<CLR>= TRASH", "<SPACE>= COMMAN 
D MODE" , , , "CURSOR MODE (DEFAULT= 
RELATIVE) : [= FULL SCREEN IMMEDI 
ATE n / n^ = SINGLE PIX IMMEDIATE",, 

375 PRINT" ]= TOGGLE L-R DOOR HIN 
GES","<SPACE>= SET FIXTURE/FURNI 
TURE",,,"R= RECALL LAST DIMENSIO 
N","P= PRINT LAST DIMENSION" , "C= 

CONTINUE FUNCTION" :GOSUB3 9 5 
380 PCLS5:PRINT§12, "SPECIAL INST 
RUCTIONS* MOVE & COPY" ,,"1. ENCL 
OSE TARGET AREA", "2. RELEASE BUT 
TON", "3. MOVE TO NEW AREA", "4. P 
RESS BUTTON AND FINE ADJUST" , , , 
385 PRINT"* FIX & FURN",,"1. SEL 
ECT DIAGRAM", "2. RELEASE & PRESS 
BUTTON TO RO- TATE" ,,"4. PRES 
S ] TO SWITCH HINGES", "5. PRESS 
<SPACE> TO SET POSITION" 
390 PRINT"* <SPACE>: CHANGE COMM 
AND TO DE- SIGN MODE W/O FUNCTI 
ON CHANGE" : GOSUB395 : GOSUB230 : GOT 
0295 

395 T=(T+1)AND1: PRINT© 121, "PRESS 
" :PRINT@152, "BUTTON>" :DRAW"BM190 
,34C=T;R58D2 2L58U22":PK=PEEK(652 
80) : IFPK=1270RPK=255THEN395ELSER 
ETURN 

400 SC=(SC+1)AND1:SCREEN1,SC:G0T 
0295 

405 IFPEEK(49152)<>68THENPRINT@2 
57, "WHERE'S DISK BASIC?" : SOUND 10 
0,1: FORT=1TO1500 : NEXT : GOT0295ELS 
EVERIFYON 

410 GOSUB255 : PRINT@65 , "SAVE" : PRI 
NT" LOAD": PRINT" RETURN A ":IFP=1 
6THENPRINT" DRIVE#"DN 
415 GOSUB260:IFV>3THEN415ELSEIFV 
=2THEN490ELSEIFV=3THENIFP=16THEN 
DN=(DN+1)AND3:PRINT@167,DN; : DRIV 
EDN:G0T0415ELSE415 
420 POKE65494,0 

425 IFV=1THEN4 3 5ELSEGOSUB230:GOS 
UB2 50 : POKEG+8 , 24/S : F0RI=1T016 : PO 
KEG+I+8 , ASC (MID$ (D$ (1) +D$ (2) ,1,1 
) ) : NEXT : IFP=16THENIFFREE ( DN) >2TH 
ENSAVEMD$(0)+".ARC",G,G+6143,380 
:GOT02 5ELSEPRINT@2 2 , "DISK FULL" : 
SOUND100 , 1 : G0SUB2 2 5 : G0T04 10 
430 CSAVEMD$(0) ,G, G+6143 , 380 : GOT 
025 

435 PCLS5:IFP=17THENPRINT§256,"P 
REPARE TAPE AND ENTER FILENAME B 



ELOW. ENTER A TO ABORT ...": 1=22 : 

GOTO4 60 

440 N=0:CLS:POKE2 55,255:PRINT@0, 

TAB(7) "ARCHIE FILE DRAWER"STRING 

$(6,32) :POKE255,0 

445 FORSE=3T011:DSKI$DN,17,SE,A$ 

,B$:A$=A$+LEFT$(B$,127) : FORI=0TO 

7 : K=I*3 2 : B$=MID$ ( A$ , K+l , 8 ) : C$=LE 

FT$(B$,1) :IFC$=CHR$(255)THENI=8: 

SE=12ELSEIFC$>CHR$ (0) THENIFMID$ ( 

A$,K+9,3)="ARC"THENPRINT" "B$, : 

N$(N)=B$:N=N+1 

450 NEXTI,SE:PRINT@3 84, " *LOAD", 

" * ABORT ( A )";:N=N-1 

455 H=INT(JOYSTK(0)/32) :V=INT(JO 

YSTK ( 1) /5 . 3 ) *2 : I=H+V: K=I*16+3 2 : P 

RINT@K,"\";:PK=PEEK( 65280) : IFPK= 

2550RPK=127THENPRINT@K, " " ; : GOTO 

455 

460 IFI=23GOTO490ELSEIFK22ANDI> 

N THEN455ELSEIFK22THENNF$=N$(I) 

+".ARC":GOT0475ELSEIFI=22THENPRI 

NT@ 4 4 8, "FILENAME " ; : INPUTNF$ 

: IFNF$=" A "THENPRINT@448 , STRING$ ( 

32,32) :GOTO490ELSEIFP=17THENNF$= 

LEFT$(NF$+STRING$(8,32) ,8) :G0T04 

75 

465 E1=INSTR(1,NF$,".") :E2=INSTR 

( 1 , NF$ , "/ " ) : IFE1=0ANDE2=0THENNF$ 

=NF$+".ARC":GOTO4 65ELSEIFE2>0THE 

NMID$ (NF$ , E2 , 1) =" . " : GOT0465ELSEN 

F$=LEFT$(LEFT$(NF$,E1-1)+STRING$ 

(8,32) , 8) +MID$ (MID$ (NF$ , El+1) +" 

"13) 
470 ' OPEN"D" , #1 , NF$ , 1 : LF=LOF ( 1) : C 
LOSE:IFLF=0TH£NKILLNF$:PRINT@448 
, "UNABLE TO FIND" : GOT0455 
475 IFP=16THENLOADMNF$:D$(0)=LEF 
T$ (NF$ , INSTR ( 2 , NF$ , " . " ) -1 ) ELSECL 
OADMNF$ : D$ (0 ) =NF$ 

480 PK=PEEK(G+8) : D$ (1) ="" : D$ (2) = 
" " : F0RI=1T08 : D$ ( 1 ) =D$ ( 1 ) +CHR$ ( PE 
EK(G+I+8) ) :D$(2)=D$(2)+CHR$(PEEK 
(G+I+16) ) :NEXT:IFPK>0THENS=2 4/PK 
:IFME THENSS=30.48/S ELSESS=12/S 
485 GOT025 

490 POKE65495-PQ,0:GOSUB230:GOTO 
295 

495 GOSUB255:PRINT@65, "PRINT" : PR 
INT" GRID": PRINT" RETURN" 
500 GOSUB260:IFV>2THEN500ELSEIFV 
=2THENGOSUB230:GOTO295ELSEGOSUB2 
30:GOSUB250:IFV=1THENFORH=0TO255 
STEP8 : FORV=8T019 1STEP8 : PSET (H , V , 
) : NEXTV , H 

505 POKE65494,0:IFL=0THENPRINT#- 
2,D$(0)CHR$(13)D$(1)CHR$(13)D$(2 
)CHR$(13)CHR$(13) 
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510 EXEC31462:GOSUB230:GOTO25 

515 GOSUB240:S=24/(INT(JOYSTK(0) 

/2.8)+2) :PK=PEEK( 65280) :IFPK=255 

ORPK=127THEN515ELSE295 

520 S1=S:S=4:PCLS5:DRAW"BM0,8C0R 

46" : PRINT§0 , "SELECT : " : PRINT§32 , " 

CHAIRS", ,"& SOFAS: "TAB (18) "5' 

6' 7"':PRINT@192,"BEDS: SNGL 

FULL QUN KNG CAL" : PRINT @ 320 , "TA 

BLES: RND RECT OCT COF TV" : PRIN 

T@448,"BED- CHST DSK DRSR NS", 

"ROOM:" 

525 FORI=0TO3:FORK=0TO4:X=64+K*3 

6:Y=22+48*I+(1ANDI) : DRAW"BM=X; , = 

Y; S4A0" : 0NK+1+I*5 GOSUB620 ,625,6 

3J3 ; 63 5, 64,0, 645, 650,655,660, 665, 6 

70 , 680 , 685 , 690 , 695 , 700 , 705 , 710 , 7 

15,720:NEXTK,I:S=S1:GOTO545 

530 PCLS5 : DRAWBM0 , 8C0R46" : PRINT 

@0 , "SELECT : " : PRINT§64 , "DOORS : 2 • 

2' 4 2 '6 2 '8 3' 0": 0=0: DRAW" 

BM60 , 22S8A0" : FORD=8T012 : GOSUB555 

:DRAW"BR10":NEXT 

53 5 PRINT@192,"BATH: COMM. SHOW 

ERS TUB":PRINT@320,"KIT: STOV 

E REF W/D SINKS" :FORI=0TO1: 

F0RK=1T05 : DRAW"BM"+STR$ ( 6+K*44) + 

•V»+STR$ (70+48*1) :ONK+I*5GOSUB56 

5,570,575,580,560,585,590,595,60 

0,605:NEXTK,I 

540 PRINT@427,"WALL"TAB(21) "CORN 

ER":PRINT@448, "FIRE- "TAB (26) , "PL 

ACE: " : DRAWBM50 , 178" : GOSUB610 : DR 

AW"BM138,178":GOSUB615:GOSUB720 

545 H=INT(JOYSTK(0)/12.8) :V=INT( 

J0YSTK(1)/16) :PRINT@K+I," " ; : I=H 

*5+8:K=96+V*12 8:PRINT@K+I,"\"; :P 

K=PEEK(65280) : IFPK=2550RPK=127TH 

EN545 

550 W=(V*5+H+l)+(P-12)*19:D=H+8: 

M=P+1 : IFH+V=7THEN490ELSE60 

555 E=D-2:DRAW"C5R=D;UL=D;DC0":I 

FO=0THENDRAW"UE=E ;UF2D=E ; "ELSEDR 

AW"U=E;E2DF=E;D": 'door 

560 RETURN 

565 DRAWR8U3L2GL2HL2ND3BRBU2U4E 

2R2F2D4G2L2H2":RETURN: 'toilet 

570 DRAWR13U13L7G6D7BE6EFGH" :RE 

TURN: 'corner shower stalls 

575 DRAWNE13R13U13L2BL4LBL4L2NF 

13D13": RETURN: 'wall shower 

580 DRAWR20U10L2H2L12G2L2D10BR2 

BU4U3E2R12F2D3G2L12H2" :RETURN: 'b 

athtub 

585 DRAWR10U8L10D8BR2BU3EFGHBR4 

EFGHBU3EFGHBL4EFGH" : RETURN : ' stov 

e 

590 DRAWR10U8NL10HL8GD8 " : RETURN 



:'refrig (30") 

595 DRAWR8U8NL8HL6GD8": RETURN: ' 

washer, dryer, dishwasher (24") 

600 DRAWR12U8L12D8BRBU3U2ER2FND 

2BR2ND2ER2FD2GL2HBL2GL2H" : RETURN 

: 'dbl sink 

605 DRAWR8U8L8D8BE2R4EU3HL4GD3F 

BDRBR2R": RETURN: 'single sink 

610 DRAWR18U6L2NL2U2H4L6G4D2NR2 

L2D6": RETURN: 'wall fireplace 

615 DRAWNE3H4E13F4GNG2F2D6G4L6H 

2" : RETURN: 'corner fireplace 

620 DRAWHU8ER8FD8GLNL7U7HL4GD7 

BR20": RETURN: wall chair 

625 DRAWLH6UE6RF6DGNG5H5LG3DF5" 

: RETURN: 'corner chair 

630 DRAWHU8ER18FD8GLNL17U7HL14G 

D7": RETURN: 'sofa (5 1 ) 

635 DRAWHU8ER22FD8GLNL21U7HL18G 

D7": RETURN: 'sofa (6') 

640 DRAWHU8ER28FD8GLNL27U7HL24G 

D7": RETURN: 'sofa (7') 

645 DRAWR13U25L13ND25BF2R9D4L9N 

U4BG2R13BD3M-13,-1":RETURN: • sgl 

bed 

650 DRAWR18U25L18ND25BF2R6ND4BR 

2R6D4L6NU4BL2L6NU4BG2R18D3M-18 , - 

1": RETURN: 'full bed 

655 DRAWR20U27L2J3ND27BF2R7ND4BR 

2R7D4L7NU4BL2L7NU4BG2R20D3M-2J3,- 

1" : RETURN : ' gueen bed 

660 DRAWR25U27L25ND27BF2R9ND4BR 

3R9D4L9NU4BL3L9NU4BG2R25D3M-25 , - 

1": RETURN: 'king bed 

665 DRAWR24U28L24ND28BF2R9ND4BR 

2R9D4L9NU4BL2L9NU4BG2R24D3M-24,- 

1" : RETURN : 'ca king bed 

670 R=7*S/4:IF(Y-R)<8THENY=8 

675 CIRCLE (X,Y-R) ,R,0: RETURN : 'di 

ning table (round) 

680 DRAWR20U12L20D12 ": RETURN :"d 

ining table (rect) 

685 DRAWBU4U6E4R6F4D6G4L6H4" :RE 

TURN: 'dining table (octagon) 

690 DRAWR16U8L16D8" : RETURN : 'cof 

fee table 

695 DRAWR12U7L12D7" -.RETURN: ■ tv 

700 DRAWR12U6L12D6": RETURN: 'che 

st 

705 DRAW"R14U6L14D6":RETURN: • des 

k 

710 DRAW" R20U6L20D6": RETURN: 'dre 

sser 

715 DRAW" R6U6L6D6": RETURN: 'night 

stand 
720 PRINT@474, "CANCEL"; :DRAW"BM2 
06,166S4R48D10L48U10" 
725 RETURN /R\ 
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Ma Bell 

Gets Personalized 



By Robert C. Lake 




Have you ever envied those personalized, or 
"vanity," phone numbers so many businesses use? 
You've seen them — like the local used-car 
dealer's ad that says, "If you want a great deal, 
just dial GOOD CAR." Wouldn't it be neat if you could 
tell your friends they should dial NICE GUY? 

How do you get those unique phone numbers? Well, it's 
usually by requesting a particular number from the phone 
company. In fact, many businesses wait years for the right 
number! In some cases the company already had a "good" 
number and simply recognized its mnemonic value. 
Mnemonics are sets of letters or words that can be used to 
stand for other numbers, ideas, etc. Let's face it, it's easier 
to remember CARPETS than 227-7387. 

But how do you know if your phone number has a useful 
mnemonic? You could look at the dial or keyboard and try 
to visualize the words your number might produce. You'd 
have to be a great visualizer, though; there are thousands 
of possible combinations for each phone number. My 
program will do the hard work for you. Vaniphone will 
accept a typical seven-digit phone number and print every 
combination of the phone dial letters associated with that 
number. 

Some of these combinations will be very good at 
triggering memory associations, some not so good. 
Obviously, GOOD CAR is a great mnemonic for a used- 
car dealer, but less obvious mnemonics can also be used to 
advantage. For example, want to call the editors of our 
favorite Color Computer magazine? Well, you could look 
up the number in the front of this magazine each time you 
need it, but I'll bet you won't forget that you can also get 
them by calling A BUGGY Crew. (Just kidding, guys!) 

Bob Lake leaches accounting and data processing at 
Auburn University in Montgomery. Alabama. He is a 
certified public accountant and holds certificates in data 
process and as a systems professional. 



When you run the program, you'll find that some phone 
numbers will have a large number of combinations. For 
example, if your number is 234-5678, there are 3X3X3 
X3X 3X3X3 combinations (2,187). You couldn't possibly 
visualize each of these combinations, but Vaniphone 
displays each and every one for you. Some phone numbers 
produce a smaller number of combinations, because there 
are no letters associated with certain digits on the phone 
dial. This program will print a numerical one wherever a 
I is encountered and a Z whenever a zero is encountered, 
since these have no letter equivalent. 

The program will print the mnemonics either to the screen 
or to a printer. When the mnemonics are printed on the 
screen, you can stop the scrolling display at any time by 
pushing the space bar. Restart the display in the same way. 

With this program and a little imagination, you'll find 
that most phone numbers have useful mnemonics. Have 
fun! 

(Questions about this program may he directed to the 
author at 3206 Covered Bridge Road. Montgomery. AL 
36116. 205-279-8185. Please enclose an SASEfor a reply 
when writing.) □ 



/ 



Mnemonics 


for: 228-4492 






AATGGWA 


AATGGWB 


AATGGWC 


AATGGXA 


AATGHWB 


AATGHWC 


AATGHXA 


AATGHXB 


AATGIWC 


AATGIXA 


AATGIXB 


AATGIXC 


AATHGXA 


AATHGXB 


AATHGXC 


AATHGYA 


AATHHXB 


AATHHXC 


AATHHYA 


AATHHYB 


AATHIXC 


AATHIYA 


AATHIYB 


AATHIYC 


AATIGYA 


AATIGYB 


AATIGYC 


AATIHWA 


AATIHYB 


AATIHYC 


AATIIWA 


AATIIWB 


AATIIYC 


AAUGGWA 


AAUGGWB 


AAUGGWC 


AAUGHWA 


AAUGHWB 


AAUGHWC 


AAUGHXA 


AAUGIWB 


AAUGIWC 


AAUGIXA 


AAUGIXB 


AAUHGWC 


AAUHGXA 


AAUHGXB 


AAUHGXC 
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The listing: VANIPHON 



1 REM ************************* 

2 REM * * 

3 REM * VANIPHON * 

4 REM * * 

5 REM * BY * 

6 REM * * 

7 REM * ROBERT C. LAKE, CDP * 

8 REM * * 

9 REM * * 

10 REM * (C) 1985 * 

11 REM * * 

12 REM ************************* 

13 CLS : PRINT@202 , "PERSONALIZED" 

14 PRINT@2 66,"PHONE NUMBER" 

15 PRINT §334, "AID" 

16 PRINT@460,"(C) 1985" 

17 FOR J=1TO2000:NEXTJ 

18 CLS 

19 PRINT "THIS PROGRAM IS DESIGN 
ED" 

20 PRINT "TO SEARCH FOR A PERSON 
ALIZED" 

21 PRINT "MNEMONIC FOR YOUR PHON 
E" 

22 PRINT "NUMBER. IT WILL DISPL 
AY ALL" 

23 PRINT "THE POSSIBLE COMBINATI 
ONS" 

2 4 PRINT "OF LETTERS FOR THE PHO 

NE " 

25 PRINT "NUMBER YOU PROVIDE." 

2 6 PRINT :PRINT"TO HALT DISPLAY, 

PUSH" 

2 7 PRINT"THE SPACE BAR. TO REST 
ART" 

28 PRINT "THE DISPLAY, PUSH IT A 
GAIN." 

29 PRINT: PRINT "DO YOU WANT THE D 
ISPLAY" 

30 PRINT"SENT TO THE pRINTER OR" 

31 PRINT"TO THE SCREEN"; 

32 A$=INKEY$:IF A$="S"ORA$="s" T 
HEN DEV=0 ELSE IF A$="P" OR A$=" 
p" THEN DEV=-2 ELSE 32 

33 IF LEFT$(A$,1)="P" OR LEFT$ (A 
$,l)="p" THEN DEV=-2 ELSE DEV=0 

34 CLS:PRINT"GIVE THE 7 -DIGIT PH 
ONE" 

3 5 PRINT "NUMBER YOU WANT TRANSL 
ATED . " 

3 6 PRINT "DO NOT INCLUDE A DASH, 

ONLY" 
37 PRINT "THE SEVEN DIGITS. 



"R" , "S" , "T" , "U" , "V" , "W" 
"X" "Y" 



38 DIM D$(10,3) 

39 M(0)=1 

40 M(l)=l 

41 FOR J=2 TO 9:M(J)=3:NEXTJ 

42 FOR J=0TO9 

4 3 FOR K=1T03 

44 READ D$(J,K) 

45 NEXT K 

46 NEXT J 

47 DATA »z","*","*","l", "*","*" 

48 DATA "A","B","C","D" 

49 DATA »E", M F M ,"G" , "H" , "I" , " J" 

50 DATA "K'V'L'V'M'VN'VO'V'P" 

51 DATA 

52 DATA 

53 INPUT N$ 

54 N1=0 

55 FOR J=1T07 

56 N(J)=VAL(MID$(N$,J,1) ) 

57 IF N(J)=0 OR N(J) =1 THEN Nl= 
Nl+1 

58 NEXT J 

59 SUM=INT(3 A (7-N1) ) 

60 PRINT: PRINT SUM;" COMBINATION 

5 " 

61 PRINT "WILL BE DISPLAYED" : PRI 
NT 

62 PRINT#DEV: PRINT #DEV, "MNEMONI 
CS FOR: ";MID$(N$,1,3) ;"-";MID$( 
N$,4,4) : PRINT #DEV 

63 FOR J1=1T03 

64 FOR J2=1T03 

65 FOR J3=1T03 

66 FOR J4=1T03 

67 FOR J5=1T03 

68 FOR J6=1T03 

69 FOR J7=1T03 

70 IF D$(N(1) ,J1)="*» OR D$(N(2) 
,J2)="*" OR D$(N(3) ,J3)="*" THEN 

76 

71 IF D$(N(4) ,J4)="*" OR D$(N(5) 
r J5)=»*« OR D$(N(6) ,J6)="*" THEN 

76 

72 IF D$(N(7) ,J7)="*" OR D$(N(8) 
,J8)="*" OR D$(N(9) ,J9)="*" THEN 

76 

73 PRINT #DEV,D$(N(1) ,J1) ;D$(N(2 
) ,J2) ;D$(N(3) ,J3) ;D$(N(4) ,J4) ;D$ 
(N(5) ,J5) ;D$(N(6) ,J6) ;D$(N(7) ,J7 

74 A$=INKEY$:IFA$=" "THEN 75 ELS 

75 A$=INKEY$:IFA$=" "THEN 76 ELS 
E 75 

7 6 NEXTJ7 : NEXTJ6 : NEXTJ5 : NEXTJ4 : N 
EXTJ3 : NEXTJ2 : NEXTJ1 

77 PRINT #DEV 



/R\ 
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RISE AND FALL After a decade of 
supporting different operating systems, 
Frank Hogg Laboratory, Inc., has 
decided to stay exclusively with OS-9, 
both the 6809 and 68000 versions. FHL 
has discontinued their support of Flex, 
both Standard 6809 and CoCo. Because 
of this, they no longer sell CCFlex. 

FHL will be supporting the CoCo 3 
and all of its pertinent products. Many 
in the CoCo Community are already 
aware of the hardware and software 
products FHL will be marketing for 
OS-9 Level 11 on the CoCo 3. The 
reason FHL has made the decision to 
support only OS-9 is that, with full 
CoCo 3 support, as well as their contin- 
uing line of QT computers and prod- 
ucts, they found it necessary to concen- 
trate on one area. They believe OS-9 is 
an operating system that suits their 
needs as well as the needs of their 
customers. 

NO FOOLING We have recently come 
across a copy of an official New York 
state document. FormX20I (Certificate 
of Conducting Business under an As- 
sumed Name for Individual). This form, 
which was filed by one Robert Harry 
Rosen, certifies the transaction of 
business for this individual under the 
name of Spectrum Projects and is dated 
April I, 1982. We have no idea what 
implications arise from that specific 
date except that Spectrum Projects just 
recently celebrated its fifth business 
anniversary. Bob Rosen says, "While 1 
am pleased and proud that we have 
passed this milestone, we're looking 
ahead to the next five years and our 10th 
anniversary!" 

Happy anniversary. Bob! 

COLORFUL IDEA If you are looking 
for color ribbons for your Radio Shack 
DM P- 1 30 printer, we have found a 
source. Marty's Rubber Stamp Shop is 
now carrying printer ribbons for the 
DMP-130 in red, green, blue, brown 



and purple, as well as traditional black. 
The price for the color ribbons is SI 3, 
and the black ribbons sell for $9. Mar- 
ty's does offer quantity discounts — a 
great idea for CoCo clubs. In addition, 
clubs may want to contact Marty's to 
get a price on bulk refills. Contact 
Martv's Rubber Stamp Shop, 47 South 
Second Street. Saint Clair. PA 17970. 
(717)429-1052. 

QUICK CABLES Ohm/ Electronics, 
Inc., has announced the availability of 
a variety of customizing 9- and 25-pin 
Scooter RS-232 Interface Cable Kits. 
The cable kits are intended for field 
service technicians, engineers, installers 
and hobbyists. A provided insertion/ 
extraction tool allows the user to 
quickly change the pin arrangement to 
meet the needs of any computer or 
computer accessory interface. Each kit 
also contains a 5- or 10-foot, nine- 
conductor, foil-shielded RS-232 cable 
with ends crimped with gold contacts, 
two hoods with strain reliefs, two con- 
nector blocks, jumper cables and all 
other mounting hardware including a 
screwdriver. A deluxe option includes 
the above, plus an RS-232 Mini-Tester, 
which uses LEDs to show lead activity 
and polarity. The tester has one male 
and one female 25-pin connector with 
all 25 pins connected straight through 
the tester. The kits are available in 
several different configurations ranging 
in price from S24.95 to S3 1.50. Contact 
Ohm I Electronics. Inc.. 746 Vermont 
Street. Palatine. IL 60067. 

VCR HELPER Sunrise Software 
proudly announces its latest software 
for the Color Computer. VCR File. 
This new program was written by John 
Fiske. author of Superclisk Utility, and 
operates on all three models of the 
Color Computer. It requires 32K of 
memory and one disk drive. Use of a 
printer is optional. 

VCR File is shipped with a complete 



operator's manual. It is not copy- 
protected, but it is run-protected. The 
program can store over 750 entries of 
movie or camcorder programs. It sorts 
to the screen or printer. It also calculates 
the amount of tape available on the 
cassettes entered in the file. 

VCR File is also easily adaptable to 
other collections of information, such 
as LP recordings, audio cassettes and 
other tape products, computer disks 
and tapes, and other similar applica- 
tions. The price for VCR File is SI 9.95, 
plus S2 S/H. Florida residents need to 
add SI for sales tax. Contact Sunrise 
Software. 8901 NW 26 Street. Sunrise. 
FL 33322. (800) 628-2828. 

DRIBBLERS BEWARE Software Ex- 
change has introduced Professional 
Basketball Handicapping System, a 
program designed for the ardent basket- 
ball enthusiast. With the system, 
anyone can quickly handicap the 
weekly NBA basketball games using 
information found in the daily news- 
paper sports section. This disk-based 
program stores the basketball data 
entered for the teams and later uses it 
for handicapping. Data can be dis- 
played onscreen or printed. The price 
for the system is S49.95 plus $2 S/ H. To 
get the Professional Basketball Handi- 
capping System for your CoCo. call 
(800)527-9467. VISA and MasterCard 
accepted. 

FREE TAXES? A program that was 
previously not available for public 
distribution is now being offered to 
CoCo owners for free. CoCo Federal 
Tax requires a 64K Color Computer 
with one disk drive. This tax preparer's 
tool is comprised of 39 programs, which 
cover Form 1040, Schedules A, B, C, D, 
E, G. SE and W. and Forms 2441. 4562 
and 6251. Send an SASE and three 
disks along with your request to Puritas 
Springs Software. 17140 Lorain 
Avenue. Cleveland. OH 44111. 
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BASIC TRAINING 



Real-Life Uses for the 
Seven-Value CIRCLE Statement 



By Joseph Kolar 
Rainbow Contributing Editor 



Before we embark upon our odys- 
sey through the promised graph- 
ics tutorials, we shall pause and 
reflect on the ubiquitous CIRCLE state- 
ment. 

CIRCLE was never previously consid- 
ered in its range of possibilities. There 
is no time like the present to correct this 
oversight. You may prefer to thumb 
through your manual to get an overview 
of CIRCLE before we demonstrate some 
real-life uses of the seven-value CIRCLE 
statement. 

Starting with a blank Hi-Res screen, 
our object is to create a simple "happy 
face," replete with ears and hair. Using 
concatenation and gobs of GOSUBs, we 
shall animate the eyes, causing them to 
scan from side to side. 

Thanks to a typing error, pressing E 
instead of 3, we shall animate the 
mouth. Instead of correcting an error, 
we use it to gel a desired effect. 

From LISTING1 key in lines 100, 1 10 
and 300. After each new program line 
is added, run it to check out your work 
to follow along with this growing pro- 
gram. You will see how it was devel- 
oped, item by item. Note that the loca- 
tion of the CIRCLE is 130,98 (the first 
two values in the statement). Originally, 
it was 128,96, the center of the screen. 
It was adjusted two units to the right 
and two units down. The facial features 
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were created slightly off-center and, to 
compensate and re-center the happy 
face, it was easier to move the circle 
rather than do massive relocating of all 
the facial components. 

This face was created dynamically 
from nothing and, being both wise and 
lazy, I took the easy way out. You, too, 
are expected to move components 
around the screen with a minimum of 
effort. Creating should be fun — not 
drudgery. 

The circle was arbitrarily made 50 
units in diameter (third value), and 
Color 1 in the two-color set was used 
(fourth value). Color I displays a fea- 
ture and Color blanks it out. 

Whenever a design element, such as 
an eye socket, is needed two or more 
times, it is better to label the element 
with a string variable and call it as many 
times as required in the program using 
concatenation. 

Key in Line 120 to get the eye socket. 
Key in Line 125 but temporarily omit 
the ending, :GOTO200. 

You may use the following alternate 
Line 125 and get substantially the same 
result: 125 DRHW"BM110,90"+fl$+"BR30" 
+fl$. In this case, we located the left eye 
socket. Since it was drawn to finish at 
the starting point (see Line 120), adding 
BR30 no draw units to the right locates 
the other socket. One way is as good as 
the other. 

In order to add a left car, we have to 
design its shape. The simplest one is a 
jug car, or the left half of a circle. 
CoCo's CIRCLE statement does this 
with a minimum of effort. Key in Line 



111. The left ear was sized at a diameter 
of 10 (third value) and displayed in 
Color 1 (fourth value). To create only 
the left half of the circle, we decided the 
shape of the ear. The height/ width ratio 
of a circle is 1. If we want to make the 
circle more elongated, we use 1.1 as the 
next value (fifth value) of the CIRCLE 
statement. If we decide to flatten it, we 
can use .8 or .9. 

To make a half-circle representing the 
left ear, we must know that the starting 
point CoCo recognizes is at 3 o'clock, 
and goes in a clockwise direction. Thus, 
our starting point is at the bottom, or 
6 o'clock. This is one fourth the distance 
around the circumference or .25. This 
decimal value is the sixth value required 
in our CIRCLE statement. 

We want our ear to end at 1 2 o'clock. 
This is three-fourths of the way around 
the boundary of the circle, or .75. This 
is the last value in our completed CIR- 
CLE statement in Line 111. It is merely 
a matter of changing the H,V locations 
to jockey the left ear, thus tacking it 
onto the side of the face. 

One ideal method of attack is to 
create the desired clement in an unused 
part of the screen — say at location 
20,20. After your design is completed, 
it is no problem to maneuver it to the 
desired location by changing the H,V 
values. This system avoids the confu- 
sion of trying to create some element 
amid distractions offered by working 
on, over or near completed elements. 

The right ear is the mirror image of 
the left ear — the other half of the circle. 
It begins at high noon and ends at 6 
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o'clock. Merely reverse the last two 
values you used to create the left ear in 
Line 111. 

Key in Line 1 12. For the heck of it, 
change the fifth value from .9 to 1 . 1 and 
compare ears! Pick your own poison 
and adjust lines III and 112 accord- 
ingly. 

We could use a token wild hair on top 
of the happy face dome to signify a 
luxuriant growth of hair. Key in Line 
113. It is no problem to locate it hori- 
zontally. Just pick up the center point 
of the big circle. 

a smaller hair on each side of the token 
hair, using a multiple-line statement. 
Key in Line 1 14. Note: The hairs are not 
as zig-zaggy or as long. This may be a 
questionable addition to our happy 
face, but that vast bald expanse cried 
out for hair. 

The nose is next. A U-shaped nose 
suffices for our purpose. Key in Line 
115. 

If you prefer, you may link the nose 
to the eye sockets by altering Line 1 15. 
After BL insert NU4 and change the 3 at 
the end to 13. 

Of course, you could have made the 
eye sockets and nose in one continuous 
line, but who can anticipate what we 
shall dream up? If you did, you wouldn't 
have to use concatenation and it would 
be a whole new ball game. If you care 
to fool around, work it out! 

To create a curvy mouth, key in Line 
116. This program line may look 
strange to you. But take it on good faith. 
It will be thoroughly explained a few 
tutorials down the pike. 

At this stage, we have a bushy, jug- 
eared, happy face. I plan to use crossed 
lines to make a pair of eyes. Since we 
expect to move the pair of eyes as a unit, 
we must have one pair displayed using 
CI and one pair blanked out using C0, 
using string variables, B$ and CS, re- 
spectively. 

Key in lines 121 and 122. To display 
the eyes, we shall have to locate them 
and use concatenation to turn them on. 
Key in Line 130, temporarily omitting 
GOSUB105:. Then to blank them out, 
key in Line 131, temporarily omitting 
GOSUB105: and :RETURN. 

The picture whizzed by so swiftly the 
eyeballs didn't show up. They were 
instantly erased. A time pause is called 
for. We shall use the pause repeatedly. 
Therefore, we need a GDSUB routine that 
we can place almost anywhere, out of 
harm's way, in the program. Key in Line 
105. 

Now, when you run it, CoCo is driven 
up the wall and bleats out RG ERROR IN 
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105. We quieten CoCo's nerves by 
keying in Line 104, which signals CoCo 
to bypass the offensive line. 

To put the pause into effect, insert 
GOSUB105: at the beginning of Line 
131. If we use only eyeballs, we do not 
get as great an illusion of eye movement. 
Thus, we will use an alternate set of X- 
shapcd eyeballs. This set of X-shaped 
eyeballs will be designated DS and will 
be blanked out using E$. Key in lines 
123 and 124. 

To display the X eyes, key in Line 140, 



to insert :GDSUB150 in front of 
:G0T0125. 

To get the eye to return to the center, 
merely edit Line 200 to insert 
:GOSUB140:GOSUB130 in front of 
GDTD12S. 

To make the eyes move to the left of 
center, key in lines 160 and 170, 
temporarily omitting :GO5UB500 in 
both lines 160 and 170. Edit Line 200 
to insert : GOSUB1G0 : GOSUB170: 
GOSUB1G0:GOSUB130 in front of 
:G0T0125. 



"This urges CoCo, after 
displaying the eye socket, to 
shoot down to Line 200, the 
operating line, to select the 
desired GOSUBs." 



temporarily omitting GO5UB105:. You 
will see that a pause is badly needed. 
Edit Line 140 and insert GOSUB105: at 
the beginning. 

To blank out the X eyes, key in Line 
141, temporarily omitting both 
GOSUB105: and : RETURN. After check- 
ing it out, the point being made, insert 
GOSUB105: at the beginning of Line 
141. 

It is obvious that if we want the eyes 
to continuously recycle, we could end 
with 150 GOTO 125. To make the eyes 
move around in an haphazard position, 
we should put the pair into GDSUB 
routines. So, to create G05UB routines, 
add :RETURN to both lines 131 and 141. 

We get our usual R/ G Error messages 
awakening us to create an operating 
line. Key in 200 GOSUB130:GOSUB140 
:G0T0125. 

Insert GO5UB105: in front of Line 
130. Add :GDTO200 at the end of Line 
125. This urges CoCo, after displaying 
the eye socket, to shoot down to Line 
200, the operating line, to select the 
desired GOSUBs. 

To move the eyes over one more unit, 
using a multiple-line statement, key in 
Line 150, which is the GOSUB routine to 
accomplish the mission. Edit Line 200 



Our next objective is to make the 
mouth appear and disappear. We placed 
the routine at the end of the program 
because it was experimental. We wanted 
to see what would come up and if we 
should use it. 

Key in Line 500. To place it inside the 
working program, insert GDSUB500: in 
front of RETURN in both lines 160 and 
170. Now we can give it the acid test. 

The reason we got this misbegotten 
mouth, as alluded to at the beginning of 
this tutorial, is when I was copying Line 
1 16 into the mouth routine at Line 500, 
I pressed E instead of 3 in half of the 
routine. When it didn't work properly, 
I noticed both FE and F3. 1 corrected the 
wrong one. Instead of changing FE to 
F3, I compounded the mistake by 
changing F3 to FE. 

Here is where two wrongs make a 
right. Inadvertently, the mouth opened 
and shut. It added to the animation, so 
it was incorporated into the program. 

Notice how we have GOSUBs nested in 
GOSUB routines. It is no different than 
nested GOTO routines. 

Type CSFIVE"LISTING1". Here is a 
variation that uses only the + eyes: 
Rekey 200 GOSUB130 :GOSUB150: 
GOSUB170:GOTO125. 



Try this variation: Rekey 200 
GOSUB140:GOSUB1G0:GOTO125. To 
make the eyes move randomly, rekey 
200 X=RND ( 5 ) : DN X GOTO 201 , 202 , 203 , 
204,205. 

Add: 



201 GO5UB130: 

202 GO5UB140: 

203 GDSUB1S0: 

204 GD5UB1G0: 

205 GO5UB170: 



GQTD200 
GOTO200 
GOTO200 
GDTO200 
GDTO200 



A nicer variation is to edit the pre- 
vious version and delete :GOTO200 
from lines 201 to 204. Can you spot the 
differing results? Save any variation you 
might want as a jumping off point for 
further experimentation. 

Now that you have this down pat, 
why not make the eyeballs appear to 
rotate by changing the + to X and spin 
the eyeballs? Rip this tutorial apart and 
try to come up with something original. 

To make the wild hair spin, alter the 
previous variation as shown in LIST- 
ING2, which is the same except for 
adding lines 106 and 600 and altering 
lines 201, 202 and 203. Type 
CSRVE"L1STING2". 



You must be groggy from watching 
the spinning hair. Type CLOflD" 
LISTING1". What do you say we elon- 
gate the head? Add ,1.1, to Line 110. 
The head will be longer. The only 
adjustment necessary is relocating the 
three hairs on his dome, lines 1 13 and 
1 14. Do it! 

Let us flatten the head by changing 
1.1 to .9 in Line 1 10. Again, adjusting 
lines 113 and 114 solves the problem. 
Either elongated or flattened, the happy 
face looks more natural. CSflVE at your 
discretion. 

To give the appearance of spinning (if 
not flashing) eyes, type CLOflD" 
LISTING1". In Line 105, change 150 to 
20. 

In lines 140 and 141, change 115 to 
114 and 145 to 144. 

Delete Line 150. Rekey 200 
GOSUB130:GDSUB140:GOSUB105: 
G0T0125. What have we learned? If you 
are an expert, nothing much. But, if you 
are a newcomer to CoColand, you've 
learned to play with the CIRCLE state- 
ment. You've learned to animate eyes, 
spin hairs and open and shut a mouth. 

You could wiggle the ears and nose. 



The name of the game is experiment. 
See what happens when you do the 
unexpected. It is exciting to be con- 
fronted by a new, unanticipaled result. 
This is the fun part that makes newcom- 
ers glad they bought their CoCo. 

This happy face can be embellished 
further with eyebrows. They could be 
raised or lowered. The eyeballs could be 
circles, V's or upside-down Vs. An 
Adam's apple could be added and made 
to bob up and down. 

Heck! The face could be alternated 
from elongated to flattened. You will 
have to do a lot of relocating, but that 
is all part of being creative. 

If you create some proud masterpiece 
and want to share it with me, feel free 
to send me a listing. In the meantime, 
I am going to keep playing around with 
the happy face. Next month, you will 
see some other modifications. Aren't 
you glad to be a citizen of CoCo- 
land? □ 



Two- Liner Contest Winner . . . 

Here's one to print labels for your disks. It runs on 
the DMP-105 from Radio Shack. 

The listing: 

10 LINEINPUT"dsk. no" ; D$ : LINEINPU 
T"dsk.name";N$:LINEINPUT"rev.sid 
e";R$:D=INT( (18-LEN(D$) )/2) :N=IN 

' / / 1 0_T.T?M f\J<£\ \ /"} \ • D-THT I t n.T.TTH I 



J*? . U— -LIN X \ \ iO" J_i£j1N ^ U? j ) / 6 ) . IN — X1N 

T( (18-LEN(N$) )/2) :R=INT( (27-LEN( 
R$) )/2) :PRINT#-2,CHR$(27) ;CHR$(2 
p) ;CHR$(27) ;CHR$(31) ; "RSDOS"STRI 
NG$(36,32)"TRS8j3/COCO";CHR$(27) ; 
CHR$(32) ;CHR$(27) ; 

20 PRINT#-2,CHR$(23) ;CHR$(27) ; CH 
R$(14) ;CHR$(27) ;CHR$(28) ;CHR$(13 
) ;STRING$(D,32)D$;CHR$(13) ;CHR$( 
13) ;CHR$(13) ;STRING$ (N, 32) N$ ;CHR 
$(27) ;CHR$(15) ;CHR$(27) ;CHR$(23) 
;CHR$(27) ;CHR$(31) ;CHR$(13) ;CHR$ 
(13) ;CHR$(13) ;STRING$(R,32) "Rev. 
Side> "R$;CHR$(13) :GOTO10 

David Johnson 
Leicester. AT 



(For this winning two-liner contest entry, the ;iuthor has been sent copies of 
hoi li The Second Rainbow Hook of Simulations und its companion The Second 
Rainbow Simulations Tape.) 
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MAGAZINE for color computer users. 



icctroqram Magazine provides useful and interesting supporl material 
r the Color Computer with a wide range of programs and articles by 
me of the best writers and programmers available. 

BASIC. Help by Bill Bernico: A monthly question-and-answer 
column for the BASIC programer. Using program examples. Bill 
gives detailed answers to questions sent by our readers. 
Ed9£iuLPXQCTamrninS) by Delmar Searls: With useful program 
examples, Delmar gives an in-depth study of Pascal and how to 
use it effectively. 

P.OJvnlime by Rush Caley: Thought-provoking, emotional, and at 
times very humorous. Downtime is informative and entertaining, 
providing little-known facts and new and different ideas. 
.QQCpC|g b C orner by Ted Paul: News and information about your 
organization s BBS, newsletter, and club activities in this column. 

5tric^ly_B_Usjnc55; A special section for use of the Color Computer In 
a nusiness-likc setting. Problem-solving techniques, programs such 
as Trend Analysis ana Ad Effect, interviews ana profiles. 

The permanent columns and scries compliment an array of articles 
covering Assembly, C, OS~9, graphics animation with an emphasis on 
understanding;, utilities, games, and home management — ana all 
programs are available on "Finger Savers" disk or tape. 



Fnp^^o? Vfl 2 ,SSUES 0F SPECTROGRAM MAGAZINE 
FOR *2l (40% off the cover price). 



Name: 



Address: _ 



Cily, Stale E Zip: 

( ICheck ( )Visa ( )M/C l_ 



. Exp. 



Signature, 



Mail to: 



SPECTROGRAM MAGAZINE 
P. O. Box 138 (815)968-9600 
Rockford, IL 61 105 



Foreign subs criptions : (U.S. currency only) 
Canada and Mexico $28 All others $36 



Single issue price: $2.95 

Finger Savers $70 per year ()Dlsk ()Tape 
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Listing 1: 

'<LISTING1> 

10)3 PM0DE4, 1:PCLS:SCREEN1,0 

104 GOTO 110 

105 FORZ=1TO150: NEXT: RETURN 

110 CIRCLE (130, 98) ,50,1 

111 CIRCLE (8J3, 96) ,10,1, .9, .25, .7 
5 

112 CIRCLE (180, 96) ,10,1, .9, .75, . 
25 

113 DRAW ,, BM130,48H3E3H3E3H3E3H3" 

114 DRAW'BM105,56U2H4U4H4":DRAW" 
BM155,56U2E4U4E4" 

115 DRAW"BM127,95BLD9F3R5E3U9" 

116 DRAW'C1BM112,118F3M+15,7R5M+ 
15,-7E3" 

120 A$="C1BL2E5R7F5G5L7H5" 

121 B$="C1R3NU2ND2R3" 

122 C$="C0R3NU2ND2R3" 

123 D$="C1BU2F4BU4G4" 

124 E$="C0BU2F4BU4G4" 

125 DRAW"BM110 , 90"+A$ : DRAW M BM140 
,90"+A$:GOTO200 

130 GOSUB105 : DRAWBM114 , 90"+B$ : D 
RAW'BM144,90"+B$ 

131 GOSUB105 : DRAW"BM114 , 90"+C$ : D 
RAW"BM144,90"+C$ -.RETURN 

140 GOSUB105 : DRAWBM115 , 90"+D$ : D 
RAW"BM145,90"+D$ 

141 GOSUB105 : DRAW"BM115 , 90"+E$ : D 
RAW"BM14 5, 90 "+E$: RETURN 

150 GOSUB105 : DRAW"BM116 , 90"+B$ : D 

RAW'BM146,90"+B$:GOSUB105: DRAW'B 

M116,90"+C$:DRAW I BM14 6,90"+C$:RE 

TURN 

160 GOSUB105 : DRAWBM113 , 90"+D$ : D 

RAWBM143 , 90"+D$ : GOSUB105 : DRAW'B 

M113 , 90"+E$ : DRAWBM143 , 90"+E$ : GO 

SUB500: RETURN 

170 GOSUB105:DRAW'BM112,90"+B$:D 

RAWBM142 , 90"+B$ : GOSUB105 : DRAW'B 

M112 , 90"+C$ : DRAWBM142 , 90"+C$ : GO 

SUB500 : RETURN 

200 GOSUB130:GOSUB140:GOSUB150:G 

OSUB140 : GOSUB130 : GOSUB160 : GOSUB1 

70 : GOSUB160 : GOSUB130 : GOT0125 

300 GOTO300 

500 DRAWC0BM112, 118FEM+15 , 7R5M+ 

15 , -7E3" : GOSUB105 : DRAW'C1BM112 , 1 

18FEM+15 , 7R5M+15 , -7E3 " : RETURN 



Listing 2: 

'<LISTING2> 

100 PMODE4,1:PCLS:SCREEN1,0 

104 GOTO110 

105 FORZ=1TO150: NEXT: RETURN 



106 FOR Z=l TO 50 : NEXT : RETURN 

110 CIRCLE (130, 98) ,50,1 

111 CIRCLE(80,96) ,10,1, .9, .25, .7 
5 

112 CIRCLE (180, 96) ,10,1, .9, .75, . 
25 

113 DRAW"C1BM130,48H3E3H3E3H3E3H 
3" 

114 DRAWBM105 , 56U2H4U4H4" : DRAW" 
BM155,56U2E4U4E4" 

115 DRAW"BM127,95BLD9F3R5E3U9" 

116 DRAW"C1BM112,118F3M+15,7R5M+ 
15,-7E3" 

120 A$="C1BL2E5R7F5G5L7H5 M 

121 B$="C1R3NU2ND2R3" 

122 C$="C0R3NU2ND2R3" 

123 D$="C1BU2F4BU4G4" 

124 E$= M C0BU2F4BU4G4" 

125 DRAW"BM110 , 90"+A$ : DRAWBM140 
,90"+A$:GOTO200 

130 GOSUB105 : DRAW ,, BM114 , 90"+B$ : D 
RAW"BM144,90"+B$ 

131 GOSUB105:DRAW"BM114,90"+C$:D 
RAWBM144 , 90"+C$ -.RETURN 

140 GOSUB105 : DRAWBM115 , 90"+D$ : D 
RAW"BM145,90"+D$ 

141 GOSUB105 : DRAWBM115 , 90"+E$ : D 
RAW"BM145,90"+E$:RETURN 

150 GOSUB105 : DRAW"BM116 , 90"+B$ : D 
RAWBM146 , 90"+B$ : GOSUB105 : DRAW'B 
M116 , 90"+C$ : DRAWBM14 6 , 90"+C$ : GO 
SUB600: RETURN 

160 GOSUB105 : DRAW*BM113 , 90"+D$ : D 
RAW'BM143 , 90"+D$ :GOSUB105 : DRAW'B 
M113,90"+E$:DRAW'BM143,90"+E$:GO 
SUB500 : RETURN 

170 GOSUB105 : DRAWBM112 , 90"+B$ : D 
RAWBM142 , 90"+B$ : GOSUB105 : DRAW'B 
M112 , 90"+C$ : DRAWBM142 , 90"+C$ : GO 
SUB500 : RETURN 

200 X=RND(5):ON X GOTO201, 202 , 20 
3,204,205 

201 GOSUB130-.GOSUB600 

202 GOSUB140:GOSUB600 

203 GOSUB150:GOSUB600 

204 GOSUB160: 

205 GOSUB170:GOTO200 
300 GOTO300 

500 DRAW'C0BM112,118FEM+15,7R5M+ 
15 , -7E3 " : GOSUB105 : DRAWC1BM112 , 1 
18FEM+15 , 7R5M+15 , -7E3 " : RETURN 
600 FORY=l TO 3 : DRAWC0BM130 , 48H 
3E3H3E3H3E3H3":GOSUB106:DRAW'C1B 
M130,48E3H3E3H3E3H3E3":DRAW , C^iBM 
130,48E3H3E3H3E3H3E3":DRAW'C1BM1 
30, 48H3E3H3E3H3E3H3": NEXT: RETURN 
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XTEAM 

OS -9 




XTERM 

OS-9 Communicalions program. 

• Menu oriented • Definable macro keys 

• Upload/download. Ascii • Works with standard serial port, RS232 

or XMODEM protocol PAK, or PBJ 2SP Pack, Includes all drivers. 

• Execute OS-9 commands ■ Works with standard screen. XSCREEN, or 
from within XTERM WORDPAK 80 column board. 



$49.95 



with source $89.95 



XMENU 



Creates a menu driven environment for OS-9. 
. Create your own menus " Wori[s wiUl sundard screen, 



$29 



XSCREEN, WORDPAK. O-PAK 
.95 with source $5 9. 9 5 



XSCREEN 

OS-9 hi-res screen 
•51/64/85 chars per line . Easy menu operation 

$19.95 with source $39.95 



\ ______ 







XDIR & XCAL 



Ilicrarchial directory 

• Full sorting 

• Complete pattern matching 



OS-9 calculator 

■ Decimal, Hex. Binary 

• +.-.•,/, AND.OR, XOR, NOT 



$24.95 withsourcc $49.95 



. : : : v;,.. 



;5S .KM S;W: 



.,.,,.■..■:,,;:;: ' ,■ 



XDIS 

OS-9 disassembler 
$34.95 with source $54.95 



BOTH 



'■'"""■' •"■••■ ■■■■■■■■:■:■■■-■■ -■■■■" :■■■:■•■■ 




XWORD 

OS-9 word processing system 

• Works with standard text screen. XSCREEN. WORDPAK. or O-PAK 

• True character oriented full screen editing 

• Full block commands 

• Find and Replace commands 

• Execute OS-9 commands from within 

• Proportional spacing supported 

• Full printer control, character size, emphasized, italics, 
ovcrstrike, underline, super/sub- scripts 

- 10 header/footers 

■ Page numbering in decimal or Roman numerals 

• Margins and headers can be set different for even and odd pages 

$69.95 with source $124.95 

XMERGE 

Mail merge capabilities for XWORD 
3p^4.yO with source $4 9. 9 5 

XSPELL 

OS-9 spelling checker, with 20000 and 40000 word dictionaries 

$39.95 
XTRIO 

XWORD/XMERGE/XSPELL 
$114.95 with XWORD/XMERGE sourc* 199.95 

XED 

OS-9 full screen editor 
$39.95 with source $79. 95 



AND FOR RS DOS 



SMALL BUSINESS ACCOUNTING 

This sales-based accounting package is designed 
for the non- accounting oriented businessman. Il 
also contains the flexibility for the accounting ori- 
ented user to set up a double entry journal with an 
almost unlimited chart of accounts. Includes Sales 
Kntry, transaction driven Accounts Receivable and 
Accounts Payable, Journal Entry. Payroll Disburse- 
ment, and Record Maintenance programs. System 
outputs include Balance Sheet, Income Statement, 
Customer and Vendor status Reports, Accounts 
Receivable and Payable Aging Reports, Check Reg- 
ister, Sales Reports, Account Status Lists, and a 
JoumalPosting List. $79 95 

INVENTORY CONTROL/SALES ANALYSIS 

This module is designed to handle inventory control, 
with user defined product codes, and produce a detailed 
analysis of the business* sales and the sales force. One 
may cntcrAipdatc inventory data, enter sales, run five 
sales analysis reports, run five inventory reports, set up 
product codes, enter /update salesman records, and 
update the SBAP inventory. $59.95 



PAYROLL 

Designed for maintaining personnel and payroll 
data for up to 200 hourly and salaried employees 
with 8 deductions each. Calculates payroll and tax 
amounts, prints checks and maintains year-lo-date 
totals which can be automatically transferred to the 
SBA package. Computes each pay period's totals 
for straight lime, overtime and bonus pay and det- 
ermines taxes to be withheld. Additional outputs 
include mailing list, listing of employees, ycar-lo- 
datc federal and/or state lax listing, and a listing of 
current misc. deductions. Suited for use in ail stales 
except Oklahoma rfhd Delaware. $59 95 



These programs are user friendly and menu 
driven. Sample transactions are included. Each 
package features a hi-res screen. Each requires 
a printer, a minimum of 32k and at least 1 disk 
dove. 



ACCOUNTS RECEIVABLE 

Includes detailed audit trails and history reports 
for each customer, prepares invoices and monthly 
statements, mailing labels, aging lists, and an alpha- 
betized customer listing. The user can define net 
terms for commercial accounts or finance charges 
for revolving accounts. This package functions as a 
standalone A/R system or integrates with the Small 
Business Accounting package. $59 95 



ACCOUNTS PAYABLE 

Designed for the maintenance of vendor and A/P 
invoice files. The system prints checks, voids 
checks, cancels checks, deletes cancelled checks, 
and deletes paid A/P invoices. The user can run a 
Vendor List, Vendor Status report, Vendor Aged 
report, and an A/P Check Register. This package 
can be used either as a standalone A/P system or 
can be integrated with the Small Business 
Accounting Package. $59 95 



MICROTECH 
CONSULTANTS 

I |v I /% 1906 Jerrold Avenue 
I |^| {, m St. Paul, MN 55112 

DtaUr tuquiriti Invifd 

Author Submissions acctpltd 

OS-9 is a t rods mark of Micro war I 




Ordering Information 

Add $3.00 shipping & handling, MN residents add 6% sales tax. 
Visa, Mastercard, COD (add $2.50). personal checks. 



(612) 633-6161 



EDUCATION OVERVIEW 



S-P Analysis: 
Comparing The Curves 



By Michael Plog, Ph.D. 
Rainbow Contributing Editor 



Normally, I deal with rather 
broad issues related to comput- 
ers and education. However, I 
would like to make a departure from my 
usual type of article. This month, 1 want 
to present a very specific application of 
a computer to help teachers in class- 
rooms. 

Perhaps a little explanation is in 
order. I teach a part-time course for a 
local university. One of the duties of any 
teacher is to assign grades to students. 
Most teachers use tests to determine 
those grades, and I am no exception. A 
teacher's most hated job is grading test 
papers. This task is unavoidable, how- 
ever, and the other day I found myself 
with red pen in hand and a challenge on 
the desk. 

While going through the tests, some- 
thing did not seem right. Responses 
from the students just felt wrong. I 
checked the tests with some simple 
analyses of students and test items. The 
result is this article. This month, we will 
be dealing with a use of the computer 
to examine characteristics of teacher- 
made tests. I hope other teachers can 
use the procedures outlined here to 
learn a little more about their own tests. 

Once I decided to examine the test. 



Michael Plog received his doctorate 
degree from the University of Illinois. 
He has taught social studies in high 
school, worked in the central of/ice of 
a school district and is currently em- 
ployed at the Illinois State Board of 
Education. 



it was time to crank up the Color 
Computer. Of course, I used a word 
processing package to prepare and print 
the test. 1 also keep student grades and 
lecture notes in computer form. But for 
this activity, 1 needed a spreadsheet. 
Any spreadsheet will do the job. 

A spreadsheet is made up of rows and 
columns. For our purposes today, think 
of rows as students and columns as test 
items. The value in each cell is a 1 if the 
student answered the item correctly, 
and a if the item is incorrect. 

I used an additional column for 
student name, and one for total number 
of items answered correctly. Although 
not necessary, I used one column for the 
percentage of total correct responses for 
each student. Likewise, one row is used 
for the test item number (sort of the 



name of the item), one row for total 
number of students correctly answering 
the item, and one row for percent of 
students with correct answers. 

One major reason for using a spread- 
sheet is to let the computer calculate the 
totals and percents. I'll discuss a second 
reason later. 

While the idea here is very simple, the 
words that have to be used are difficult. 
An example makes this easier to under- 
stand. In Table I, 14 students responded 
to 10 items on a test. (This is a sample. 
The actual test involved more students 
and more items.) 

One way of looking at the table is to 
examine students. Albert Adams, for 
example, answered every test item 
correctly. In the column named "Num," 
we see 10 correct test items, for a percent 



Table 1: Test Results 
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Number 
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11 
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14 






Percent 


93 


79 


64 


57 
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79 


86 
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the Color Computer Word Processor 



3 display formats: 51/64/85 

columns x 24 lines 

True lower case characters 

User-friendly full -screen 

editor 

Right justification 

Easy hyphenation 

Drives any printer 

Embedded format and 

control codes 

Runs in 16K, 32K, or 64K 

Menu-driven disk and 

cassette I/O 

No hardware modifications 

required 



THE ORIGINAL 



Simply staled. Telewriter is the mosi powerful 
word processor you can buy for ihe TRS-80 
Color Computer. The original Telewriter has 
received rave reviews in every major Color 
Computer and TRS-80 magazine, as well as 
enthusiastic praise from thousands of satisfied 
owners. And rightly so. 
The standard Color Computer display of 32 
characters by 16 lines without lower case is 
simply inadequate for serious word processing. 
The checkerboard letters and tiny lines give you 
no feel for how your writing looks or reads. 
Telewriter gives the Color Computer a 51 
column by 24 line screen display with true 
lower case characters. So a Telewriter screen 
looks like a printed page, with a good chunk of 
text on screen at one time. In fact, more on 
screen text than you'd get with Apple II, Atari, 
TI, Vic or TRS-80 Model 111. 

On lop of that, the sophisticated Telewriter 
full-screen editor is so simple to use, it makes 
writing fan. With single-letter mnemonic 
commands, and menu-driven I/O and 
formatting. Telewriter surpasses all others for 
user friendliness and pure power. 

Telewriter's chain printing feature means that 
the size of your text is never limited by the 
amount of memory you have, and Telewriter's 
advanced cassette handler gives you a powerful 
word processor without the major additional 
cost of a disk. 



,.Ottt of the best programs for ihe Color 
Computer I have seen... 

— Color Computet News. Jan. 1982 



TELEWRITER-64 



But now we've added more power to 
Telewriter. Not just bells and whistles, but 
major features that give you total control over 
your writing. We call this new supercharged 
version Telewriier-64. For two reasons. 



64K COMPATIBLE 



Telewriter-64 runs fully in any Color Computer 
— I6K. 32K, or 64K, with or without Extended 
Basic, with disk or cassette or both. It 
automatically configures itself to take optimum 
advantage of all available memory. That means 
that when you upgrade your memory, the 
Telewriter-64 text buffer grows accordingly. In 
a 64K cassette based system, for example, you 
get about 40K of memory to store text. So you 
don't need disk or FLEX to put all your 64K 
to work immediately. 



64 COLUMNS (AND 85!) 



Besides the original 51 column screen, 
Telewriter-64 now gives you 2 additional high- 
density displays: 64 x 24 and 85 x 24!! Both 
high density modes provide all the standard 
Telewriter editing capabilities, and you can 
switch instantly to any of the 3 formats with a 
single control key command. 
The 51 x 24 display is clear and crisp on the 
screen. The two high density modes are more 
crowded and less easily readable, but they are 
perfect foi- showing you the exact layout of 
your printed page, all on the screen at one 
time. Compare this with cumbersome 
"windows" that show you only fragments at a 
time and don't even allow editing. 



RIGHT JUSTIFICATION & 
HYPHENATION 



One outstanding advantage of Ihe full-width 
screen display is that you can now set the 
screen width to match the width of your 
printed page, so that "what you see is what 
you get." This makes exact alignment of 
columns possible and il makes hyphenation 
simple. 

Since short lines are the reason for the large 
spaces often found in standard right justified 
text, and since hyphenation is the most 
effective way to eliminate shorl lines, 
Telewriter-64 can now promise you some of the 
best looking right justification you can get on 
the Color Computer. 



FEATURES & SPECIFICATIONS: 



Printing and formatting: Drives any primer 
(LPVII/VIII, DMP-100/200, Epson. Okidata, 
Centronics, NEC, C. huh. Smith-Corona. 
Terminet. etc). 

Embedded control codes give full dynamic access to 
intelligent printer Features like: underlining, 
subscript, superscript, variable font and type si/c, dot- 
graphics, etc. 

Dynamic (embedded) Format controls for: top, 
bottom, and left margins; line length, lines per page, 
line spacing, new page, change page numbering, 
conditional new page, enable/disable justification. 
Menu-driven control oF these parameters, as well as: 
pause at page bottom, page numbering, baud rate (so 
you can run your printer at top speed), and Epson 
font. "Typewriicr" feature sends typed lines directly 
to your printer, and Direct mode sends control codes 
right from the keyboard. Special Epson driver 
simplifies use with MX-80. 

Supports single and multi-line herders and automatic 
centering. Print or save all or any section of the text 
buffer. Chain print any number of files from cassette 
or disk. 



File and I/O Features: ASCII formal files — 
create and edit BASIC, Assembly, Pascal, and C 
programs, Smart Terminal files (for uploading or 
downloading), even text files from other word 
processors. Compatible with spelling checkers (like 
Spell 'n Fix). 

Cassette verify command for sire saves. Cassette auto- 
retry means you lype a load command only once no 
matter where you are in the tape. 
Read in. save, partial save, and append files with disk 
and/or cassette. For disk: print directory with free 
space to screen or printer, kill and rename files, set 
default drive. Easily customized to the number oF 
drives in the system. 

Editing features: Fast, full-screen editor with 
wordwrap, block copy, block move, block delete, line 
delete, global search and replace (or delete), wild card 
search, fast auto-repeat cursor, fast scrolling, cursor 
up, down, right, left, begin line, end line, lop of text, 
bottom of text; page forward, page backward, align 
text, labs, choice of buff or green background, 
complete error protection, line counter, word counter, 
space left, current file name, default drive in effect, 
set line length on screen. 

Insert or delete text anywhere on the screen without 
changing "modes." This fast "free-form" editor 
provides maximum ease of use. Everything you do 
appears immediately on the screen in front of you. 
Commands require only a single key or a single key 
plus CLEAR. 



...truly a slate of the art word processor., 
outstanding in every respect. 

— The RAINBOW. Jan. 1982 



RAINBOW 

C£1TlFlCAt<0'< 



PROFESSIONAL 
WORD PROCESSING 



You can no longer afford to be without the 
power and efficiency word processing brings to 
everything you write. The TRS-80 Color 
Computer is the lowest priced micro with the 
capability for serious word processing. And 
only Telewriter-64 fully unleashes that 
capability. 

Telewriter-64 costs S49.95 on cassette. $59.95 
on disk, and comes complete with over 70 
pages of well-written documentation. (The step- 
by-step tutorial will have your writing with 
Telewriter-64 in a matter of minutes.) 
To order, send check or money order to: 

Cognitec 

704 Nob Street 

Del Mar, C A 92014 

Or check your local software store. If you have 
questions, or would like lo order by Visa or 
Mastercard, call us at (619) 755-1258 (weekdays. 
8AM-4PM PST). Dealer inquiries invited. (Add 
$2 for shipping. Californians add 6% state tax.) 

Available at 
Radio /hack stores 
via express order 

catalogue #90-0253 
90-0254 

Apple II is a trademark of Apple Computer, Inc.; Alan is a trademark 
nl Alari. Inc.: TRS-X0 is a trademark o( landy Corp; MX-K0 is a 
trademark o( Epson Amcnca. Inc. 



("%" column) of 100 percent. Nora 
Normans answered only five of the 10 
correctly, for a score of 50 percent. 

In addition toexaminingstudents, we 
can also consider the test items (called 
problems) as shown in the table. Item 
10, for example, was answered correctly 
by all 14 students. Item 5 was answered 
correctly by seven (50 percent) students. 
Thus, Item 10 is the easiest problem on 
the test, and Item 5 is the most difficult. 
This procedure then becomes a simple 
item analysis of your test. 

The other reason for using a spread- 
sheet is to sort your table. In this 
procedure, two sorts are needed. First, 
rank order each item on the test from 
least difficult to most difficult. Diffi- 
culty of item is determined by how 
many students correctly answered the 
item. Thus, the most difficult item is 
that one answered correctly by the 
fewest number of students. The easiest 
item is the one answered correctly by the 
greatest number of students. 

The second sort is to rank order your 
spreadsheet by student raw score. The 
student correctly answering the most 
questions is at the top of the list; the 
student correctly answering the fewest 
lest items is at the bottom of the list. 
Your newly sorted spreadsheet will now 
look like Table 2. 

From Table 2, you can tell that 
Adams and Iverson got the highest 
scores in class. Also, Item 10 is the 
easiest item on the test, and Item 5 is the 
most difficult. 

Now comes the part that is hard to 
describe. We are going to convert Table 



Table 2: Test Results After Sorting 
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57 


43 
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2 into an "S-P Chart" (shown in Table 
3). The 'S' stands for "Student"; the 'P' 
stands for "Problem." or test item. An 
S-P Chart is a matrix in which students 
(rows) are arranged from top to bottom 
in descending order of total test score. 
The problems, or test items (columns), 
are arranged from left to right in as- 
cending order of difficulty. Two lines are 
drawn on the S-P Chart. The first is the 
S-curve, shown here as a solid line. It 
is drawn by placing a vertical line over 
each student corresponding to the total 
test score earned by the student. 

Both Adams and Iverson got all 10 
problems correct, so the S-curve is to 





Table 3: S-P Chart 
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the right of the tenth item. Baker got 
nine of the 10 items correct, so the S- 
curve is between the ninth and tenth 
item. 

The second line is the P-curve, shown 
in Table 3 as a dotted line. What the S- 
curve is to students, the P-curve is to 
problems, or test items. A horizontal 
line is drawn over each problem corre- 
sponding to the number of students 
answering that problem correctly. Thus, 
Item 10 was answered correctly by 14 
students and has a line below the 14th 
student. Item 1 was answered correctly 
by 13 students and has a line between 
the 13th and 14th student. 

Directions for drawing the two curves 
are difficult to say in words, but fairly 
easy to actually draw on the table. 
Please examine Table 3 to see the lines. 

Think for a moment of the ideal 
situation. If the students in your class 
are perfectly rank ordered by ability 
(which they probably will not be), and 
your test is a perfect test (which none 
of mine are), the S-curve and the P- 
curve will be exactly the same line. The 
best student in your class will answer all 
your test questions that the second-best 
student answers, plus will get some 
correct that the second-best student will 
miss. 

Likewise, consider your test items. 
The most difficult test items will be 
answered only by the best student in 
class. The second most difficult test 
items will be answered correctly by the 
best student and the second-best stu- 
dent in class. And so on, for each item 
on your test. As the level of difficulty 
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er 



By having 
better 
classroom 
tests, teachers 
can make a 
firmer 

decision about 
student 
abilities. " 



gets easier, more students will answer 
the item correctly. 

If you have constructed the perfect 
test for the perfect class, there will be no 
Is to the right of the S-curve or below 
the P-curve. Likewise, there will be no 
Os to the left of the S-curve or above the 
P-curve. The value of the S-P Chart is 
that you can identify areas of concern 
in your test items and your students. 

You can easily tell from Table 3 that 
1 did not construct the perfect test. One 
area of concern for me would be Item 
8. This item was answered correctly by 
the three worst students in class, but 
missed by one student who scored 90% 
on the test. Why did Crowner miss Item 
8 while Johnson, Martin, and Normans 
all got it right? Is there something wrong 
with Item 8, or something out of kilter 
with the students? 

Another area of concern is Item 5, the 
most difficult item on the test. Of the six 
students who correctly answered Item 5, 
half are above the P-curve (where they 
should be), but half are below the P- 
curve (where they should not be). 

The key to your S-P analysis is your 
judgment about the items and the stu- 
dents. Perhaps Crowner was sick the 
day we dealt with the information in 



Item 8. Perhaps Item 8 was written in 
a way that confused Crowner (normally 
a good student). Perhaps Item 5 is such 
a bad test question that all students 
guessed at it, and only six students were 
lucky. 

A perceptive teacher can use S-P 
analysis to improve test items, which 
will improve the way measurement of 
student knowledge is determined. By 
having better classroom tests, teachers 
can make a firmer decision about stu- 
dent abilities. This should lead to better 
curriculum planning for individual 
students. 

This description is only the first step 
in S-P analysis. The entire system 
provides much more information than 
presented here. S-P analysis can be 
explained in detail by Dr. Delwyn 
Harnisch of the Institute for Child 
Behavior and Development at the Uni- 
versity of Illinois in Champaign. Even 
at its most simple application, however, 
S-P analysis may be a worthwhile tool 
for teachers concerned about classroom 
tests. 

That is all for now. If you have 
comments or questions, contact me at 
829 Evergreen, Chatham, IL 62629. ^ 



Formaker 

clean paperwork for business 

"It will give the small or home business professional-looking 
forms and effortless, errorless totals, accounting for taxes, 
discounts, shipping and deposits." 

The RAINBOW, May 1986 

menu driven ,/^^v 

customize for your company //^^yV 

on screen Instructions *" "• 

creates: Invoice, quote, purchase order, RAINBOW 

mall order, receipt, letter ««.-«..«» 

printer customization & nn 

and much, much more ^49 32K ECB disc 

"You have to look good to the customer . . This program 
helps . . . by providing neat, well-prepared forms . . ." 

The RAINBOW, May 1986 



Makes learning so much fun . . . rainbow 
. . . that kids think it's a game! TS8T 

Letter and number recognition. Ages 2 to 6 

$24 32K ECB disc or tape 
"If you are looking for a program to teach young children 
the alphabet, numbers and early vocabulary, SUPER TUTOR 
may fit the bin." The rainbow, June 1988 

Send for more Information: 

Challenger software 

42 4th Street 

Pennsburg, PA 18073 

Call (215) 679-8792 (Evenings) 



NEW 51 2K UPGRADE 
FOR COCO 3 

Now available the LR Tech 512K upgrade 

with a[| g old contacts and 1 20 nanosecond 

256K chips. Useable as a RAM disk from 

basic or as large system memory for OS 9 

,evel 2!!! * jl «. r- 

$105, 



INTRODUCTORY 
PRICE... 

$59. 

WITHOUT 256K 
CHIPS 



WITH 256K CHIPS 




See next page 
lor more specials. 



YOU CAN USE THIS SYSTEM WITH 
OUR SUPER BOARD (SEE NEXT MONTH) FOR" 
A THREE USER SYSTEM UNDER OS 9. 
WORKS WITH OUR HARD DRIVE. 



TOLL FREE 
ORDER LINE 



(800) 
245-6228 




M.C. & VISA 
Accepted 

OWL-WARE 

P.O. Box 116-D 
Mertztown. PA. 
19539 

PA. Res. lnclude6%Tax 
(2 7 5; 682-6855 
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NOVICES NICHE 



h Pocketful 




rograms 



The new Color Computer owner buys his/her versatile machine for its graphics and music 
capabilities, organization of their home and office, educational purposes — both in the home 
and school and to acquire programming knowledge — and some, simply for pure fun and 
entertainment. 

As far as the CoCo is concerned, the more you learn, the more you realize how little you actually 
know. That is why every session at the keyboard is an adventure in learning. 

THE RAINBOW is a teaching environment and we realize that the majority of our readers will always 
be beginners. In our continuing effort to always keep the new user in mind and in addition to the many 
beginner feature articles and programs published in every issue, "Novices Niche" will contain shorter 
BASIC program listings that will entertain and help the new user gain expertise in all aspects of the 
Color Computer: graphics, music, games, utilities, education, programming, etc. 

Contributions to "Novices Niche" are welcome from everyone. We like to run a variety of short 
programs that can be typed in at one sitting and will be useful, educational and fun. Keep in mind, 
although the short programs are limited in scope, many novice programmers find it enjoyable and quite 
educational to improve the software written by others. 

Program submissions must be on tape or disk. We're sorry, but we do not have the time to key in 
program listings. All programs should be supported by some editorial commentary, explaining how 
the program works. If your submission is accepted for publication, the payment rate will be established 
and agreed upon prior to publication. 

— Jutta Kapfhammer 
Submissions Editor 




CoCo3 



The listing: BALLDEMO 



That's The Way 
he oall oounces 

By Ted Kyte 

The following program uses the PALETTE command to 
simulate the rotation of a ball and a fluctuating border. The 
GET and PUT commands are used to bounce the ball around 
the screen. 



BOUNCING BALL 

BY TED KYTE 

WES -CAN COLOR BOARD 

24HR BBS (403) -564-4118 

NOT BAD FOR 5 LINES OF BASIC 



1 

2 

3 

4 

5 

6 

7 

10 DIMC(6,6) :PLAY"T255":POKE6549 

7,0: PALETTECMP : HBUFF1 ,13 22: PALET 

TE0 , 1 : HCOLOR0 , 1 : HSCREEN2 : F0RM=1T 

05:READX,Y,R,C,H,S,E:HCIRCLE(X,Y 

) ,R,C,H,S,E:NEXT:HCOLOR1,,0:FORX= 

1T06 : HLINE (0 , X) - ( 40 , X) , PSET : NEXT 

:FORX=52TO44STEP-l:HLINE(0,X)-(4 

0,X) , PSET : NEXT :HCOLOR0,1 
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20 F0RX=1T05: READS, C: PALETTES, C: 
NEXT : F0RM=1T05 : READX , Y , C , B : HPAIN 
T ( X , Y ) , C , B : NEXT : HLINE ( , ) - ( 5 5 , 5 
5) ,PSET,B:HPAINT(2,2) :HLINE (0 , 19 
)-(50,19) ,PSET: HLINE (0,31) -(50,3 
1 ) , PSET : F0RM=1T05 : READX , Y , C , B : HP 
AINT(X,Y) ,C,B:NEXT:HGET(0,0)-(52 
,48) , 1:HCLS0 

30 FORC=2T06:FORT=2T06:READC(C,T 
) : NEXT : NEXT : A=0 : B=0 : C=3 20 : D=19 2 : 
FORX=2T06 : HCOLORX , : F0RY=1T04 : HL 
INE(A,B)-(C,D) , PSET,B:A=A+1:B=B+ 
1 : C=C-1 : D=D-1 : NEXT : NEXT : X=18 : Y=8 
8 : A=5 : B=5 : DATA2 5,25,20,0,1,0,1,3 
3, 25, 22, 0,1,. 25,. 75, 17, 25, 22, 0,1 
, .75, .25,37,25,18,0,1.5 



40 FORC=2T06:FORS=2T06: PALETTES, 
C(C,S) :NEXT:HPUT(X,Y)-(X+52,Y+48 
) ,1:X=X+A:Y=Y+B:IFX>24 6THENX=246 
:PLAY"5":A=-5:GOTO40ELSEIFX<20TH 
ENX=20 : A=5 : PLAY"5 " : GOTO40ELSEIFY 
>12 1THENY=12 1 : PLAY" 5 » : B=-5 : GOT04 
0ELSEIFY<22THENY=22:PLAY"5":B=5: 
GOTO40ELSENEXT : GOTO40 
50 DATA .3, .65,13,2 5,18,0,1.5, .8 
, .3,2,63,3,3 6,4,16,5,11,6,54,40, 
25,2,0,33,25,3,0,25,25,4,0,17,25 
,5,0,10,25,6,0,25,25,6,0,17,25,2 
,0,10,25,3,0,40,25,4,0,33,25,5,0 
,63,3 6,16,11,54,3 6,16,11,54,63,1 
6,11,54,63,3 6,11,54,63,3 6,16,54, 
63,36,16,11 



CoCo3 



Two- T one Text 

By Edward Jones 



Many of us who have had only a 32-column text screen 
with black characters on a green background are over- 
whelmed by the 64 background, border and text colors 
available with the CoCo 3. With this great assortment to 
choose from, it can be difficult to know which background 
colors to use with which border or text colors. 

The following program operates in the 40-character width 
text screen and allows you to see what the 64 background 
colors really look like with any of the other 64 border colors 
and a variety of text colors. This can be handy when you want 
to select color combinations for a BASIC program or to find 
a combination to work with in either the 40- or 80-character 
screen. 

The program menu will allow you to toggle through the 
background colors and to match the border to the back- 
ground and try different text colors at any point. Many of 
the combinations are a relief from the old black and green 
text screen. 

When you find a set of colors you like, you can break out 
of the program, enter NEW and then use them until you alter 
the colors again or turn off the computer. 



The listing: CDLDRS 

10 'COC03 HI-RES TEXT SCREEN BOR 
DER AND BACKGROUND COLOR SELECTO 
R BY EDWARD JONES 
20 WIDTH4 : PALETTE0 , : PALETTE8 , 6 



3:CLS1:X=-1:T=0:B=0 

30 X=X+l:IFX=64THENX=0 

40 PALETTE0,X 

50 CLS:IF B>-1THENPRINT: PRINT" T 

HE BORDER COLOR IS PALETTE 0,";B 

60 PRINT: PRINT" THE BACKGROUND C 

OLOR IS PALLET ," ;X: PRINT: PRINT 

STRING$ (40,61);: F0RL=1T02 : PRINT : 

NEXTL 

70 PRINT"PRESS <G> TO GO TO NEXT 

BACKGROUND COLOR" 
80 PRINT"PRESS (M> TO MATCH THE 
BORDER COLOR TO" : PRINT: PRINT" 

TO THE BACKGRKOUND COLOR" 
90 PRINT: PRINT "PRESS <T> TO TOGG 
LE LETTERING BETWEEN" : PRINT: PRIN 
T" WHITE, BLACK, RED, G 

REEN, BLUE" 
100 PRINT" PRESS <Q> TO KILL THIS 

PROGRAM AND KEEP" : PRINT : PRINT" 
THE CURRENT BACKGROUND, 

BORDER": PRINT" AND TEX 

T COLORS" 

110 A$=INKEY$:IFA$=""THEN110 
120 IFA$="M"THENB=X:CLS1:GOTO40 
130 IFA$="G"THEN30 
140 IFA$="T"THENGOSUB170 
150 IF A$="Q"THEN CLS:NEW 
160 GOTO110 

170 IF T=0THENPALETTE8,0:T=3 6:RE 
TURN 

180 IF T=36THENPALETTE8,36:T=8:R 
ETURN 

185 IF T=8THENPALETTE8,8:T=20:RE 
TURN 

190 IF T=20THENPALETTE8,20:T=63: 
RETURN 

200 IF T=63THENPALETTE8,63:T=0:R 
ETURN 
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raphics 



16K 
ECB 



Four Shades Of O ray 

By Pierre Salvail 



Color Dump prints graphics screens in PMODE 3 or PMODE 
1. Each color on the screen is represented by a different color 
shading. 

To perform a sceen dump, first make sure the image to be 
dumped is in memory. Then, simply load and run Color 
Dump. The computer asks you to select the PMODE and 
prompts you to choose the Gemini or SG-IO printer mode. 
After answering, the graphics screen will be displayed. 

When you are sure (he screen is what you want to dump, 
press any key. The computer will then display the gray scales 
available that can be printed on paper, and the word GREEN. 
Enter the number of the gray scale that will represent, on 
paper, the green color on the screen. Do the same for the 
yellow, blue and red colors. More than one screen color can 
have the same gray scale. 

Make sure the printer is online, press any key and the 
graphics screen will be dumped to the printer in about 20 
minutes. 



The listing: COLRDUMP 




10 
20 
30 
40 
50 
60 
70 
80 
90 



>******«******************** 



i * 
i * 
' * 

' * 



* 
* 

* 
* 



SCREEN DUMP FOR GEMINI 
AND SG-10 PRINTERS IN 
PMODE 3 AND PMODE 1 
BY 
PIERRE SALVAIL 
9 5 CHARLOTTE, SOREL 
QUEBEC, CANADA, J3P 1G7 
*************************** 

100 CLS: PRINT: INPUT" PMODE";PM:I 

FPMOl AND PM<>3 THEN RUN ELSE P 

MODE PM , 1 

110 CLS: PRINT: PRINT" gEMINI 10X" 

+CHR$(13)+" sG 10":GOSUB310:IFA$ 

="G"THENG$=CHR$ (27 ) +"K"+CHR$ ( 176 

)+CHR$(l) :SP=48:GOTO140 

120 IF A$="S"THENG$=CHR$(27)+"g" 

+CHR$(5)+CHR$(224)+CHR$(1) :SP=9 6 



Screen Dump Using Color Dump 



:GOTO140 

130 GOTO110 

140 F(1)=2:F(3)=1 

150 C1(1)=0:C2(1)=0 

160 C1(2)=8:C2(2)=2 

170 C1(3)=10:C2(3)=5 

180 C1(4)=13:C2(4)=7 

190 C1(5)=15:C2(5)=15 

200 SCREEN1,0:GOSUB310 

210 CLS :F0RC=1T05:READC$: PRINTS 1 

40+32*C,STR$(C) ;"- ";C$:NEXT 

2 20 F0RC=1T04:READC$:PRINT@129,C 

$ ; "=" : G0SUB3 10 : R (C) =VAL ( A$ ) : NEXT 

230 PRINT@392, "PRESS ANY KEY": GO 

SUB310:SCREEN1,0 

240 PRINT#-2,CHR$(27) ; "A" ; CHR$ (8 

) 

250 FORX=0TO2 55STEP4 

2 60 PRINT#-2,G$; 

270 FORS=lTO SP:PRINT#-2,CHR$(0) 

; : NEXT 

280 FORY=191TO0STEP-F(PM) 

290 FORP=lTO F(PM) : PRINT#-2 , CHR$ 

(Cl(R(PPOINT(X,Y) ) )*16 OR C1(R(P 

POINT(X+2,Y) ) ) ) ;CHR$(C2(R(PPOINT 

(X,Y)))*16 OR C2(R(PPOINT(X+2,Y) 

)) ) ; :NEXTP,Y:PRINT#-2:NEXTX 

300 CLS: END 

3 10 A$=INKEY$ : IFA$=" "THEN310ELSE 

RETURN 

3 20 DATA WHITE, LIGHT GRAY, GRAY, D 
ARK GRAY, BLACK 

330 DATA GREEN , YELLOW , BLUE , RED 
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Utilities 



4K 



Library Labeler 

By Alan L. Andrews 



Cassette Box Labeler prints labels to fit in the clear end 
of cassette boxes. This allows you to see which tape is in the 
box without having to remove it from the shelf or holder. 

The program is set up to be used with a Star SG-IO printer, 
but different printer codes can be substituted. Line 10 is the 
baud poke, lines 12 and 13 set the left and right margins, and 
Line 14 sets the printer for emphasized print. 

The program first asks for the information you want 
printed. The input can be no longer than 38 spaces. To change 
the pause, edit the T=l in Line 17. Lines 22 through 25 reset 
the printer. 

The printed lines are guides for cutting and should be as 
long as the cassette box is wide. 

The listing: CF1SBXLBL 



9> 
1 
2 
3 
4 
5 
6 
7 
8 
\$ 



'CASBXLBL/UTL 

'<« CASSETTE BOX LABELS »> 

1 <« PRINTING UTILITY »> 

'<« DEVELOPED & PROGRAMED >» 

'<« BY >» 

'<« ALAN L. ANDREWS >» 

•<« (THE LONE COYOTE) »> 

POKE 150,1 



11 ESC$=CHR$(27) 

12 PRINT#-2,ESC$"M"CHR$(£T 



13 PRINT#-2,ESC$"Q"CHR$(39) ; 

14 PRINT#-2,ESC$"E"; 

15 FOR X=l TO 38:PRINT#-2,CHR$(9 
5 ) ; : NEXT 

16 CLS(8):SOUND 50 , 2 : INPUT "WHAT 
DO YOU WANT TO PRINT ON THE CASS 
ETTE BOX LABEL" ;A$ 

17 IF LEN(A$)>38 THEN PRINT@128, 
"YOU ONLY HAVE 38 SPACES .";: SOUN 
D 1,3: FOR T=l TO 3000: NEXT T:GOT 
16 

18 PRINT#-2:PRINT#-2:PRINT#-2,A$ 

19 CLS(2) : INPUT "DO YOU WANT TO P 
RINT ANOTHER (Y/N)";B$ 

20 IF B$="Y" OR B$="y" THEN GOTO 
15 

21 CLS:FOR X=l TO 3 8 :PRINT#-2 , CH 
R$(95) ; :NEXT 

22 PRINT#-2,CHR$(13) 

23 PRINT#-2,ESC$"M"CHR$(0) 

24 PRINT#-2,ESC$"Q"CHR$(80) 

25 PRINT#-2,ESC$"F" 

26 END 




Printout 



4K 



Sized To Fit 

By Forrest K. White 

Listing Formatter will set up a Gemini 10X or compatible 
printer to print listings in a 32-, 40-, or 80-column mode and 
will skip over perforations on longer listings. 

With your printer on and online, load and run the program. 
Then load the program that you want a printed listing of, 
select the formal and type LLIST. 



The listing: FORMATTR 

1)3 CLS 

20 REM WIDTH 3 2 REM DELETE FIRST 

REM FOR COCO 3 
30 REM PRTSETUP BY 

FORREST K. WHITE 

BOX 535 

RIVERVIEW AL. 
36872 
40 INPUT "DO YOU WANT 
ODE 
ODE 
ODE";X 



(1)32 COL M 
(2)4,0 COL M 
(3) 80 COL M 
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50 IF X=l THEN Y=3 2 

60 IF X=2 THEN Y=40 

70 IF X=3 THEN Y=80 

80 PRINT"THIS WILL SET THE GEMIN 

I 10X PRINTER TO PRINT IN A"; 

Y; "COLUMN MODE" 

90 PRINT 

100 PRINT"RUN THIS PROGRAM WITH 

THE PRINTER TURNED ON THEN 

WITHOUT TURNING OFF THE PRINTE 
R LOAD ANDLLIST THE PROGRAM THAT 

YOU WANT TO SEE IN" j ;Y"COLUMN MO 
DE" 

110 PRINT"TYPE ANY KEY TO CONTIN 
UE" 

120 IF INKEY$=""THEN 120 
130 CLS 

140 PRINT#-2,CHR$(27)CHR$(78)CHR 
$(6)' SET AND ENABLE SKIP-OVER P 
ERF- ORATION FEATURE 



150 PRINT#-2,CHR$(27)CHR$(82)CHR 
$(6)' CHANGE THE LOCATION OF HEAD 

VT> fVTOdT T.TMTT H17 VrCPMN 



$(6) w^,»« x^ x^w.x^wx, 

ER (FIRST LINE OF FORM) 

160 IF X=3 THEN 2 20 

170 PRINT#-2,CHR$(27)CHR$(77)CHR 

$(6) 'SET THE LEFT HAND PRINT M 

ARGIN 

180 IFX=2 THEN 210 

190 PRINT#-2,CHR$(27)CHR$(81)CHR 

$(37) 'SET THE RIGHT HAND PRINT M 

ARGIN 

200 GOTO 220 

210 PRINT#-2,CHR$(27)CHR$(81)CHR 

$(45) 'SET AND ENABLE THE RIGHT 

HAND MARGIN FOR 40 COL PRINT 
220 PRINT"YOU ARE NOW READY TO L 
OAD OR CLOAD ANY BASIC PROGRA 
M THAT YOU WANT PRINTED IN";Y 
; "COLUMN FORMAT" 




Double Duty 

By Joe Perevosnik 



Disk Dir uses only one granule and prints hard copies of 
disk directories on the Star SG-10 printer. 

Simply turn on the printer, load and run the program, and 
answer the "Name" prompt. The directory of Drive will be 
printed in double-strike, super-script letters. When the 
directory of Drive is printed, the prompt appears again and, 
upon input, prints the directory of Drive I. 

Two printed directories are small enough to fit side by side 
on the front of a disk jacket and can be cut and taped to the 
front of the jacket. 

Perhaps this program will help keep some order in your 
disk collection. 

The listing: DISK DIR 

10 PRINT#-2,CHR$(27) "A"CHR$(7) :P 
RINT#-2 , CHR$ (27 ) "G" : PRINT#-2 , CHR 
$(27) "E":PRINT#-2,CHR$(27) "S"CHR 

$(0) 

20 PRINT#-2:INPUT"DISK NAME";X$: 

PRINT#-2 , X$ : PRINT#-2 , " 

ii : poKElll , 254 : DIR: PRIN 

T#-2: PRINT* -2, "FREE SPACE"FREE(0 

) "GRANULES" : PRINT#-2 , " 

ii : print#-2 : PRINT#-2 



30 PRINT#-2:INPUT"DISK NAME";X$: 

PRINT#-2 , X$ : PRINT#-2 , " 

":P0KE111 ; 254:DIR(1) :PR 

INT#-2 : PRINT#-2 , "FREE SPACE"FREE 

(1) "GRANULES" :PRINT#-2," 

ii . GOTO20 
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[Printing With Style 

By Blake C. Hughes 



Prim Font prints 10 different styles on a Tandy DMP-105 
printer. Select a style and you are ready to print with your 
favorite program or word processor. 

If you would like a hard copy of each style, simply add 
the following line after running the program: 

330 PRINT"UHAT STYLE ARE YOU SAM 

PLING?~:LINEINPUTI$:PRINTtt-2,I$: 

GOTO10 

It is not necessary to clear the printer buffer when changing 
styles. The buffer is automatically cleared of any existing 
printer codes each time a new style is selected. 

The listing: PRNTFDNT 



10 

20 
30 
40 
50 
60 



DMP-105 
BY BLAKE C. 
5210 GLANCY 
CARMICHAEL, 



HUGHES 

DR. 

CA 9 5608 



PRINT#-2,CHR$(14) ;CHR$(27) ;CH 
R$(15) ;CHR$(27) ;CHR$(32) ;CHR$(27 
) ;CHR$(19) ; :UN=1:GOTO80 
70 CLS: PRINT: PRINT" CHOOSE A ST 
YLE TO UNDERLINE" :GOTO90 
80 CLS: PRINT: PRINT" SELECT A 
STYLE OF PRINT" 



90 PRINT@96," 1. 
DENSITY 2 . 
DENSITY 3 . 
SED DENSITY 4. 
SITY 5. 

ITY 6. 



STANDARD NORMAL 
STANDARD ELITE 
STANDARD CONDEN 
BOLD NORMAL DEN 
BOLD ELITE DENS 
BOLD CONDENSED 






ELONGATION 
ELONGATION 
ELONGATION 



NORMAL 
ELITE D 
CONDENS 

UNDER 



DENSITY" 

100 PRINT" 7 

DENSITY 8 

ENSITY 9 

E DENSITY" 

110 IF UN=1 THEN PRINT" 10. 

LINE" 

120 INPUT C$ 

130 IF C$="l" THEN 230 

140 IF C$="2" THEN 240 

150 IF C$="3" THEN 250 

160 IF C$="4" THEN 260 

170 IF C$="5" THEN 270 

180 IF C$="6" THEN 280 

190 IF C$="7" THEN 290 

200 IF C$="8" THEN 300 

210 IF C$="9" THEN 310 

2 20 IF C$= M 10" THEN 3 20 ELSE80 
230 GOSUB330 

240 PRINT#-2,CHR$(27) ;CHR$(23) 
GOSUB3 30 

250 PRINT#-2,CHR$(27) ;CHR$(20) 
GOSUB3 30 

260 PRINT#-2,CHR$(27) ;CHR$(31) 
GOSUB3 30 

270 PRINT#-2,CHR$(27) ;CHR$(31) ; C 

HR$(27) ;CHR$(23) ;:GOSUB330 

280 PRINT#-2,CHR$(27) ;CHR$(31) ; C 

HR$ (27); CHR$ ( 20 ) ; : GOSUB3 30 

290 PRINT#-2,CHR$(27) ;CHR$(14) ; : 

GOSUB3 30 

300 PRINT#-2,CHR$(27) ;CHR$(14) ;C 

HR$ (27) ; CHR$ (23);: GOSUB3 30 

310 PRINT#-2,CHR$(27) ;CHR$(14) ;C 

HR$(27) ;CHR$(20) ;:GOSUB3 30 

320 PRINT#-2,CHR$(15) ;:UN=0:GOTO 

70 

3 30 CLS: PRINT" YOUR PRINTER IS 
NOW READY ! ! " : END 



SOU ""*""--» «2» *"" -o^ "*"* V 
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iCTOR ASCII 



The Price is Right 
and Upgrade Looks Easy 



By Richard E. Esposito 

Rainbow Contributing Editor 

with Richard W. Libra 



Can I use a TEAC FD-54A SSDD 
40-irack. half-height disk drive as 
Drive 1 on my FD 501? These are 
available for about $50, and the up- 
grade looks easy enough to do myself. 
Michael J. Keyes 
(MIKEYES) 
Wichita, KS 



O Any half-height drive that is IBM 

*jC PC-compatible will do the job, 

although, due to the orientation of the 

edge connector, with some drives you 

may need a new cable. 

Remote Terminals 



/ own a Co Co I and a Co Co 2 and 
would like to know how to use one 
of them as a remote terminal in my 
home. I know that running a terminal 
program on both computers will make 
them "talk " to each other, but I would 
like to run multiple tasks so that my wife 
and I can work on different projects at 
the same time. I also own OS-9 Version 
1.0. What modifications do I need to 
make on my hardware, and what addi- 
tional software, if any, do /need? 

Erasmo A. Martinez 
Water town, NY 

15 You can obtain a 4-pin DIN to 4- 

A }C pin DIN cable from Radio Shack 

catalog number 26-3020, S4.95. At one 

Richard Esposito is a senior project 
engineer with Northrop Corp. He holds 
bachelor's, master's and doctorate 
degrees from Polytechnic Institute of 
Brooklyn. He has been writing about 
microcomputers since 1980. 

Richard Libra is a simulator test 
operator for Singer Link Simulation 
Systems Division. 
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of the DINs, the wires need to be 
switched between pins 2 and 4, creating 
a null-modem cable. If you run OS-9's 
tsman on one CoCo, you can sign on 
as a terminal from the other (using 
terminal software) as a remote user. It 
would work much better if the OS-9 
host CoCo is a CoCo 3 running Level 
II. 

Needs More Speed 

/ have a 64 K CoCo 2 with a disk 
drive and DM P- 1 10 printer. I'm 
using CoCo Graphics Designer. Is 
there any way to speed up this program? 

Frank Daniel 

(KIRBYE) 

Smyrna, GA 

Yi. Before running the program, type 
1 % POKE G5495,0 and set your 
printer baud rate to half the normal 
baud value. This makes your CoCo run 



at double speed when in ROM. To 
return to normal speed, type POKE 
65494,0. 



Booting DOS From Drive 1 

How can DOS programs be run 
from Drive 1 ? I have tried RUN DOS : 1 
and Drive 1 starts the boot routine, 
but Drive kicks in to complete the 
operation. I have also tried using Drive 
I as the system default, but it does not 
help. 

Rick Pochervina 

(RAPOC) 

Wickliffe, OH 



1? As long as the drive number is not 

/£■ hard-coded into the software, 

you can type DRIVE 1 making Drive 1 

the default drive. Then typing RUN 

"DOS" will access the drive you want. 

Artifact Colors on CoCo 3 



/ would like to know if there is any 
software for the CoCo 3 that will 
display the PM0DE4 artifact colors on 
a Tandy CM-8 monitor. These colors 
are not important in most games but, in 
a game like Q*Bert, you need to know 
the colors of the squares. 

Jason B. Ruddock 

(J A YR) 

Montville, NJ 

IP Sorry Jason, artifact colors can- 
/(- not be displayed on the CM-8. 
For this reason, many CoCo 3 users 
have opted for Magnavox's 8CM515 
monitor that has both RGB and com- 
posite video inputs. When viewing a 
display with artifact colors on the 




PAY ONLY FOR WHAT YOU WANT 



( OVER 1 00 UTILITIES TO CHOOSE FROM ) 



40k Basic for Cassette Programs* 

40K for Disk Programs* 

Alphabetize your disk directory 

Appointment Calendar 

ASCII File Scrambler 

ASCII file utility 

Automatic Disk Backup* 

Automatic Cassette Saver 

Automatic Disk Saver 

Automatic Directory Backup* 

Banner Maker 

Basic Program Autostart for cassette 

Base converter 

Basic Program Line Copy Utility 

Basic Search 

Bowling Score Keeper 

Calendar Maker (DMP Printers) 

Cassette Label Maker (DMP Printers) 

Clock for Programming 

Computerized Checkbook 

CoCo Base (different CoCo Products) 

CoCo Calculator 

Design your own Commands 

Disk Cataloger 

Basic Program Encryptor 

Disk Label Maker 

DMP Character Set Editor 

DMP Superscripts 

Enhanced Basic * 

Enhanced KILL 

Enhanced TRON/TROFF 

Error Locator 

Fast Sort for Basic Strings 

Function Keys 

Gemini/Epson Graphics Dump 

Gradebook for teachers 

Graphics Compression 

Graphics Lettering (2 sizes) 

Graphics Shifter 

Graphics Screen Zoom 

Home Bill Manager 

10 Data Monitor 

Inverse Highlighting 



Keystroke Saver 

Large DMP Graphics Dump 

Last Command Repeater 

Line Cross Reference 

LIST/DIR Pause 

Mailing List (Disk Only) 

ML/Basic Merge 

Memory Monitor 

Message Animator 

Metric Conversions 

ML to DATA Convenor 

Multiple Choice Test Maker 

Numeric Keypad 

ON BREAK GOTO command 

ON RESET GOTO command 

Phone Directory (Disk Only!) 

Printer-to-Screen 

Printer Tutorial 

Program Packer (Basic Pro's) 

Purchase Order Maker 

RAM Disk for Cassette* 

RAM Disk 2 (Cas & Disk)* 

RAM Test * 

Replace Phrases (Basic) 

Restore lost cas Basic pro's 

ROM Switcher * 

Sign Maker 

Single Stepper 

Slow Motion 

Speedup Tutorial 

Super INPUT/LINEINPUT 

Super Command Keys 

Super Editor 

Super Paint (65000 styles)* 

Super Repeat Key 

TAB/SHIFT-LOCK keys 

Tape Encryption 

Tape Index System 

Text Screen Dump 

Title Screen Creator 

UNKILL KILLed Disk pro's 

Variable Cross Reference 

VCR Tape Organizer 



All programs available on disk only. More than one program will be sent on the same disk. 
Documentation included. Please add $1.00 S&H. NYS residents add sales tax. All programs 
compatible with CoCo 1,2,3. Programs marked with * are compatible with CoCo 1 & 2 only. 



EACH PROGRAM - $9.00 2 PROGRAMS - $16.00 3 PROGRAMS - $21.00 

4-PROGRAMS - $24.00 5 OR MORE - $5.00 EACH 



MJF 



MICROCOM SOFTWARE 

P.O. Box 214 
Falrport, N.Y. 14450 
Phon«(716) 223-1477 



To order All orliri SSO & ilni i» nil ty lit diy Air UPS aill >i iilri c«if|i Last minute snappers 
can benelit VISA. MC. Am Ex. Check. M0. Please add S100 shipping and handling 
( USA4 CANADA, other countries S5.00) COD add $2 50 extra NYS residents please add 
Sales Tax lami<liti lkipmii Dealer inquiries invited. 




Call Toll Free (For Orders) 1-800-654-5244 9 am- 9 pm est 7 days a week 

Except NY For information, technical information, NY orders & after-hours 1-71 6-223-1 477 



Magnavox, you simply select the com- 
posite inpul. Willi the CM-8, the code 
can be patched to use PMDDE3 instead 
of PM0DE4, which will return the colors, 
but with some loss of detail. 



Editor's note: A new product 
just released from Spectrum Pro- 
jects, RGB Patch, will allow many 
programs that show up in black 
and white on a CM-8 to be dis- 
played in color. However, it will 
not work for ROM packs, pro- 
grams that run under OS-9 or 
BASIC programs. It will run with 
many machine language pro- 
grams, including some with copy 
protection schemes. 



Terminal Communications 

I own a CoCo, a TRS-80 Modem II 
and Color Connection III terminal 
software. My son owns a Commo- 
dore. I'm not sure what he's using for 
a modem or terminal software. Is it 
possible for us to communiaie via our 
terminals even though we don V have the 
same type of equipment? 

Joseph R. Lavallee 

(BA HERMAN) 

Carro/lton, TX 

T3 You need to obtain smart termi- 
/£ nal software for both machines 
and a null-modem cable (see answer to 
Erasmo Martinez) to interconnect the 
two machines. 

CoCo Util Upgrade 

/ have recently purchased a Co Co 3. 
I'm experiencing difficulty with 
Spectrum Projects' CoCo Disk Util- 
ity Version 2.1 A. It seems to lock up 
when the opening menu is displayed. 
Can you suggest a fix? Also, I'm inter- 
ested in using OS-9 Level II on my 
CoCo 3. What are the best drives for 
such a system that remain operational 
even with RS-DOS and my old CoCo 
1-3 software? 

Alan J. Weston 

(HEADLY) 

Carterville. IL 



fj. Spectrum Projects markets an 
/£ upgrade for your version of 
CoCo Util; see their ad for details. For 
maximum versatility and reliability, get 
two half-height. 40-lrack, double-sided 
drives. 



A Joker Poker Fix 

Joker Poker, March 1987. does not 
work on my CoCo 3. The cards are 
displayed on the screen, then this 
message appears: erno 2G erlin 13 
did you enter, 'F$="SC0RES":G0T0 
2125; to establish scores' I've 
tried calling the author and have re- 
ceived no answer. Help! 

Leonard ./. Petty 

(WEST1NGHOUSE) 

Danville, CA 

D^ The author intended for you to 
A type FS="SC0RE5":G0T0 2125 
before running the game for the first 
time, as lines 2125-2130 will then create 
a file named SCORES that is necessary 
for proper operation of the program. 
Note, there must be space available on 
an unprotected disk in Drive to estab- 
lish the SCORES file. 



CoCo to Leading Edge Connection 

In addition to my first computer, a 
16 K CoCo upgraded to 64 K, I now 
have an IBM clone, a Leading Edge 
640 K. In an effort to put some of my 
old CoCo tape files onto an LEdisk, my 
son tried to make a direct connection 
from the CoCo 's serial port to the serial 
port of the LE. He carefully established 
the pin configurations of an RS-232 
connector for the LE and the 4-pin 
CoCo printer output port, and then lie 
connected the two computers. Since 
direct connections did not work, he 
finally tapped into the data contacts of 
my liotek CCP-1 serial interface. He 
plugged the interface into the CoCo and 
a printer (the printer remained off), and 
connected two wires to the LE RS-232 
from two signal contacts on the Botek. 
I was able to put a file from a Co Co tape 
cartridge into the CoCo, then PRINT 
from the CoCo to the LE, and finally 
save the program on LE disk. My 
question is this: What conditions have 
to be present on the carrier detect pin 
in order to continue sending data to the 
printer board? Whatever those condi- 
tions are, Botek obviously meets them, 
while a direct connection does not. 
Also, why, when the transfer of data 
was made, was there such a prolifera- 
tion of carriage returns? Every two or 
three words had a carriage return after 
them. I had expected a loss of text form 
because of the differences in text- 
structuring signals, but I cannot under- 
stand the addition of the CRs. Lastly, 



why did the transfer work on my Tele- 
writer 64 files and for a taped ASCII 
file, but not for CoCo Scripsit ///es? 

David O. Winfrey 
Smithsburg, MD 

|v To make a null modem to con- 
/C nect the two computers, refer to 
figures 1 and 2 below: 

Short pins 4 (RTS) and 5 (CTS) on the 

DB-25. 

Short pins 6 (DSR) and 20 (DTR) on 

the DB-25. 

Join Pin 1 (TXR) of DIN with Pin 3 

(RXR) of DB-25. 

Join Pin 2 (GND) of DIN with Pin 7 

(GND) of DB-25. 

Join Pin 3 (RXR) of DIN with Pin 2 

(TXR) of DB-25. 

Join Pin 4 (CD) of DIN with Pin 8 (CD) 

of DB-25. 
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Figure 1: DB-25 Plug for IBM-PC 
Clone (cable side away from you) 
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To transfer files using this cable, use 
a smart modem program similarly 
configured on both machines. The 
IBM-PC and clones terminate each line 
of an ASCII file with CR LF while the 
CoCo terminates each line with CR 
only. So, if you list a file copied from 
a PC, it will come out double-spaced 
unless you filter out the LFs. 

A regular save from Scripsit uses its 
own special disk format. If you want to 
generate a normal (thus transferable) 
file, use the Print to Disk option in 
Scripsit. 

Spectaculator Help 

Regarding Spectaculator in your 
November column, can I change the 
print width in the ROM packs/ tape 
version? If so, when do I enter the patch 
if the ROM packs must be loaded with 
the CoCo off? Can I make it print at 
9600 baud? 

BUI Condie 
Freehold, NJ 
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D To print at 9600 baud, put a piece 
/C of tape over the cartridge detect 
land (#8) of the ROM packs. With this 
line disabled, you can POKE 150,1 for 
9600 baud and then EXEC SHC000 to run 
the program. To change the print width, 
you need to change the value in SDOAF 
to I plus your desired print width. 
Unfortunately, this address is normally 
in ROM, so you will need to make either 
a new ROM with the corrected value or 
run it from RAM. If running from 
RAM, Spectaculator is one of those 
"problem" ROM packs that needs to be 
fixed to run in RAM. 



Nothing but Garbage 

Every once in a while, I'll load 
something from tape, and il 'II be 
nothing but garbage: I wait 15 min- 
utes and it loads fine. The time of day, 
location or length of time that my CoCo 
has been on doesn't seem to make any 
difference. There must he something 
that I can do to counteract this. Do you 
have any ideas'/ 

Norman Gruff 
Dallas, TX 



D You did not say, but if you have 
/£ an 'F' board (PC board serial 
number ending in 285 or NC) CoCo 1 
with overheating problems, secure a 
copy of RS Technical Bulletin CC:20. It 
gives instructions on installing a logic 
board (AX-7089), an SN74LS12. and 
an SN74LS393 to solve the problem. If 
the problem is only with specific tapes, 
try loading the tape with the recorder 
upside down. This puts the tape in a 
slightly different orientation with re- 
spect to the head and might help an 
otherwise unloadable tape to be read. 



RS-232 Downloads 

/ have a 64 K CoCo I with a Multi- 
Pak interface, single-sided disk 
drive, a I.I Radio Shack controller, 
and a Deluxe RS-232 Program Pak 
With a model IB modem. How can I 
transfer a program from the RS-232 
Program Pak to the disk drive without 
CLOftDing to tape? Even following in- 
structions in the Mult i- Pak manual 
doesn 't seem to work. 

Charles Di Martina 
Conshohochen, PA 



The RS-232 pack, in itself, is 
incapable of reliably download- 
ing programs from information net- 
works and BBSs. To download using 
the RS-232 pack requires that you use 
a third-party terminal program with 
XON/XOFF protocol such as Auto- 
term from PXE Computing, Datal'ak 
II from Cer-Comp, Color Connection 
from Computerware, or one of the 
public domain terminal programs such 
as MikeyTerm or Greg-E-Term. 

Peeking at the Printer 

The ON BRK on my CoCo 3 is very 
helpful, but how can I tell from UASIC 
if the printer is ready before using it? 
The BREAK command will not break a 
PR I NTH - 2 that is waiting for the printer. 
I want to connect my CoCo 3 to a 
printer that has an RS-232 input. Does 
the CoCo 3 use the DTR or the XON/ 
X OFF protocol? 

Mike Chamhreau 
Los Altos. CA 

y} To check if the printer is online, 
A }C try RNDing the value at the dec- 
imal address 65314 with I. If the result 
is 0, then the printer is online. If the 



Hint . . . 

A Minor Adjustment 

I/O Errors encountered when using a tape system 
on your CoCo are quite frustrating. There are so many 
places for these errors to occur. Similarly, there are 
a thousand techniques for solving them. I found one 
that works 99 percent of the time. Use a small Phillips 
head jeweler's screwdriver to adjust the head azimuth 
of the playback head. 

First, disconnect the recorder from the CoCo, set 
the volume to a comfortable level and play the tape. 
On the CTR-80 and CTR-8 1 , you will find a small hole 
near the Radio Shack name on the front panel. There 
is a small screw in this hole. For the CCR-82, the screw 
is just to the left of the playback head in the tape 
compartment. 

Now, turn the screw slowly from side to side while 
listening to the tape. Adjust the screw until you hear 
the clearest, crispest sound possible. This is the point 
at which your tape has the best chance of loading. 
Keep in mind, you will probably have to re-adjust the 
screw for other tapes. However, it isn't that much of 
a hassle in comparison with the I/O Errors. 

Michael Nellis 
Roval Oak, MI 
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THE FIRST COMPLETE 
COCO 3 51 2K UPGRADE 

#1014 JRAMR 0K MEMORY/7\fT| ££ 



Assembled and Tested 



'<S0 



Includes User Friendly, Highly Customizable 

Double Ram Disk, Customizable Print Spooler, 

Memory Test Program and Ramdisk Utilities 

All Other Products & Software 

UGJ1 GFI7 

Oiler good thru May 30. 1987. (Add S4 00 shipping S handling; add S3 00 C O I 



PHONE TODAY 
RAY JESSE 

(301) 788-0861 (301) 987-9067 

J&R Electronics / PO Box 2572 / Columbia, Md. 21045 
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result is 1, the printer is not online. A 
typical routine might look like this: 

10 IF PEEK ( 65314 )flNDl = 

THEN 30 

20 PRINT'TURN PRINTER ON ! ! " 

:GDTD10 

30 program continues here 

The Color Computer uses the DTR 
signal from the printer's RS-232 port to 
tell the computer when the print buffer 
is full. No character processing is done 
as is the case in a system using XON/ 
XOFF. 

A VIP Solution 

// was almost t\\ o years ago that I 
purchased V \P SpeUer from Softlaw. 
I had hoped lo use it with my Script- 
sit program hut, needless to say, it never 
worked properly. For extremely short 
documents, it worked correctly. How- 
ever, longer documents would simply 
disappear toward the end of the docu- 
ment. I have called Softlaw [now VIP 
Technologies] and was told it should 
work, but the fact remains that it 
doesn't. I think I know why, however. 
All saves in Scriptsil are in binary, and 
VIP Speller is looking for the ASCII 
files. Is there any way of converting 
these binary files to ASCII code files? 
Richard Zawatzke 
Racine, WI 

|J The Scripsit program does save 
/£ text files in a strange combina- 
tion of binary and ASCII. VIP pack- 
ages also use a strange format for their 
ASCII saves. These differences are 
causing problems. I have found that a 
text file saved to disk from Scripsit can 
be read into VIP Writer with no prob- 
lems. If that file is then resaved, it will 
work correctly with VIP Speller. 

Carriage Adjustments 

/ have a problem with my Radio 
Shack Line Printer VIII (Catalog 
No. 26-1 168) that only shows up in 
the data processing mode. If I attempt 
to LLIST a program, any time the print- 
er encounters a line with more than 80 
characters, the carriage stops at the 
extreme right and the alert LED light 
comes on. If I press the reset button, the 
carriage returns to the left and begins 
printing, but some data is lost. If I try 
the self test at power up, a similar thing 
happens after printing only one line of 
characters. When attempting to print a 
report on a Pro-Color file, this also 
occurs. The printer works fine for word 



processing with VIP Writer or when in 
the graphics mode for printing pictures 
from CoCo Max. Can you tell me what 
might be wrong and how I can fix it? 

Mark Fields 
Troy, OH 

IP It sounds as if the carriage is 
}L improperly set on your LP-VIII. 
This could be due to age, but most likely 
it is because you have recently moved 
the carriage. The print head may be 
trying lo print the 80 characters that the 
printer logic is telling it to. However, the 
print head is starting too far to the right. 
When it gets out to the end of the line, 
it runs out of room and gets stuck 
against the stop on the print head guide. 
This will cause the alert light to come 
on. Make sure the print head is as far 
to the left as possible before printing. 
This should happen automatically when 
the printer is turned on; however, age 
can alter this. 

Lack of Underlines 

I have an unusual problem with my 
word processing program, VIP Writ- 
er. When I send my output to my 
printer, a Smith-Corona L-I000 daisy 
wheel, I cannot get any words under- 
lined. I've tried all of the program's 
underlining procedures and changing 
the printer's ASCII formats, but still 
cannot get the underlining function of 
my printer to operate. Do you have any 
suggestions? 

Randall Berkland 
San Francisco, CA 

t) Most printers have a specific 
}C control code or control sequence 
to designate underlining printing. This 
is usually in the form of ESCftPE##. 
Some cases may not require the escape 
character. You should first consult your 
printer manual for the proper code to 
tell the L-1000 to underline, then set up 
a special printer driver as explained in 
the VIP Writer manual. The default 
driver in the Writer program is for a 
DM P-200. The manual explains how to 
alter this driver. 

Model 100 — CoCo Tape Transfers 

/ have some cassettes for a TRS-80 
Model 100 portable computer and 
have tried to load them into my 
CoCo by poking values into locations 
143. 144 and 145, but to no avail. Can 
you offer any guidance? 

Harold Luck 
Jacksonville. AR 



yi In reference to the two figures in 
jL answer lo David Winfrey's ques- 
tion, you can build a null-modem cable 
as below: 



DB-25 

Pin 

2 

3 

7 

20 



< > 

< > 

< > 

< > 



DIN 

Pin 

3 

1 

2 
4 



Then with a smart terminal program in 
the Model 100, you can transfer ASCII- 
saved BASIC programs and text files 
between the two machines. 



No Negative Voltages Here 

What are the voltages found on pins 
I, 2, 3 and 4 on the socket numbered 
CN-2 on a Radio Shack disk drive? 
I thought that the disk drive needed +5, 
+12 and -12 volts. Is this true? 

Michael Smith 
Colorado Springs, CO 

D The connector that you refer to 
}C on your Radio Shack disk drive 
is connected to the power supply as 
follows: 

Pin 1 = +12 volts 
Pin 2 = +12 volt ground 
Pin 3 = +5 volt ground 
Pin 4 = +5 volts 

The disk drive does not require - 1 2 volts 
for operation, just +5 and +12 volts. 

CoCo 3 Service Manual 

f|] Where can I get a technical service 
Ljmanual for my CoCo 3? 
iB David Rogers 

Columbia, MD 

"D Order part #MS 260-3334, 
/£ SI 5.60, through your local Radio 
Shack dealer from Radio Shack na- 
tional parts. 



For a quicker response, your questions 
may also be submitted through RAIN- 
BOW'S CoCo SIG on Delphi. From the 
CoCo SIG> prompt, pick Rainbow 
Magazine Services, then, at the RAIN- 
BO W> prompt, type ASK for "Ask the 
Experts" to arrive at the EXPERTS> 
prompt, where you can select the "Doc- 
tor ASCII" online form which has 
complete instructions. 
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Font Creator is a program written 
for the Color Computer 3. 
Since the CoCo 3 operates in the 
all-RAM mode, it is possible to change 
things you do not like. Font Creator 
makes new fonts, or type styles, for the 
HPRINT command, which places text on 
the high resolution text screens. My 
program was inspired by an alternate 
type font created by Andre Boivin. 

The font you create is saved to a disk 
file that can be loaded like any binary 
file with the LORDM command. It is even 
possible to mix fonts by loading a font, 
printing to the Hi-Res screen, loading 
another font and printing more. 

The Hi-Res font resides in addresses 
61605 through 62364. Each character 
consists of eight bytes. Each byte con- 
trols eight pixels on one line. A high bit 
sets a pixel and a low bit clears a pixel. 
Font Creator manipulates these bits, 
saves them to memory and saves them 
to disk for later use. 

The program contains remarks that 
define the operation of each section. 
The program was designed using the 
RGB monitor which creates colors on 

Dave Jenkins is an engineer at WNIN 
FM\ TV in Evansville, Indiana, and has 
been using his Color Computers for six 
years. 



a Hi-Res screen that are different from 
a composite monitor or TV. If you don't 
like the colors, change the palettes in 
Line 100. PRLETTE is the background, 
1 the foreground, 2 the definition block 
color and 15 the command block color. 



Using the program is easy. To define 
a character, simply type the character 
on the keyboard. The current definition 
of that character is retrieved from 
memory and displayed. Use the arrow 
keys to move the flashing box to the 
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pixel you want to change. Press the 
space bar to either set a cleared pixel or 
clear a set pixel. If you make a mistake, 
simply press the space bar again. When 
you are done editing that character, 
press ENTER. 

Other commands are implemented. 
Press the space bar to access them from 
the main page of the program. These 
commands let you save or load a font 
from disk, give you instructions, return 
to the main page, display the current 
font, or end the program. 

Even if you end the program, your 
new font stays in memory. The first time 
you run the program, press the space 
bar for the other commands, then save 
the current set as DEFAULT. Later if you 
want to return to the original font, 
simply LOhDM"DEFhULT.FNT~. (Note: 
Do not use extensions when loading or 
saving within this program. The exten- 
sion of .FNT is automatically added to 
your filename.) 

To use your new font in another 
program, simply LDRDM it, but do not 
EXEC it! The font is not a machine 
language program, but an overlay to 
part of the basic memory of the com- 
puter. It is ready to go with a simple 
LOflDM command. 

The program is straightforward. A 



menu box is drawn on the upper-left 
corner of the graphics screen, and an 
editing block on the upper-right portion 
of the screen. The main menu is handled 
in lines 130 to 270. At the main menu, 
you may select a key to edit, press the 
space bar for more commands, or press 
the F2 key for special characters not 
available from the keyboard. 

The editing menu is in lines 310 to 
400. After this menu is printed, the 
program retrieves the character from 
memory and places it on the editing 
block. Lines 430 to 540 do the bit 
manipulation to set the proper squares 
on the editing block. If a bit is set, the 
square is painted on the screen. The 
arrows move the flashing square, which 
is the active editing point, around the 
editing block. A "wrap-around" is also 
active so if you move off one side of the 
block, you re-enter at the opposite side. 
The space bar toggles the square from 
its previous state, i.e., turns it on if it was 
off, and vice versa. Pressing ENTER 
stores the character in RAM in the 
usual location. 

Lines 900 to 960 print the menu for 
other commands. They are self- 
explanatory. Display Font will display 
the current font, which is done in lines 
1310 to 1350. 



Special characters are not available 
directly from the keyboard. These 
special characters are contained in a 
separate menu, available by pressing F2 
at the main menu. 

The BREAK key is used to exit any 
function. It is trapped at all times and 
usually returns you to the previous 
menu. For instance, if you change your 
mind while editing a character, you may 
press BREAK to abort that edit. Nothing 
will be stored in memory and you are 
returned to the main menu. As you can 
see, the BREAK-key trap can be changed 
at any time in the program. 

The high-speed poke is also used 
throughout the program with the excep- 
tion of disk I/O. 

The program can be modified for 
tape operation by changing L0RDP1 to 
CLOflDM in Line 1010 and SflVEM to 
CSfiVEM in Line 1020. Also, in each of 
those lines, an extension is added to the 
filename. Delete this portion of each 
line: FSFS.'TNT". 



(Questions aboui this program may 
be directed to Mr. Jenkins at 1418 East 
Illinois Street, Evansville, IN 47711. 
Please enclose an SASEfor a reply. )C\ 





88) 


PSET,BF: HCOLOR 1,0 :HGET (0 ,0) 




X^- 


-(130, 88), 1 




nGr 


w 


1 120 


•MAIN PROGRAM HERE 




220 137 1010 82 


130 


FOR X=150 TO 310 STEP 20 




420 16 1120 8 

590 181 1330 119 

800 185 END 87 


140 
150 


HLINE(X,6)-(X,166) , PSET 
NEXT X 






160 


FOR Y=6 TO 16 6 STEP 20 






170 


HLINE(150,Y)-(310,Y) , PSET 




180 


NEXT Y 






190 


HPRINT 


(2,0) ,"FONT CREATOR" 


The listing: FONT GEN 


200 


HPRINT 


(0,1), "By Dave Jenkin 


10 'INITIALIZE PROGRAM 


s 

210 


HPRINT 


(0,3), "Press characte 


20 POKE. 65497,0 


r" 






30 ON BRK GOTO 1300 


220 


HPRINT 


(3,4) ,"to define OR" 


40 HBUFF 1,5900 


230 


HPRINT 


(0,5) , "Press SPACE BA 


50 'INITIALIZE TEST STRINGS 


R" 






60 FOR J=2 3 TO 64 : T1$=T1$+CHR$ ( 


J 240 


HPRINT 


(3, 6), "for commands" 


) :NEXT 


250 


HPRINT 


(0,7) , "Press <F2>" 


70 FOR J=65 TO 96 : T2$=T2$+CHR$ ( 


J 260 


HPRINT 


(3,8) ,"for special" 


) :NEXT 


270 


HPRINT 


(3,9 ''characters" 


80 FOR J=97 TO 127 : T3$=T3$+CHR$ 


( 280 


D$=INKEY$:IF D$="" THEN 280 


J) :NEXT 


290 


IF D$=CHR$(4) THEN 1380 'F2 


90 HSCREEN 2 


KEY? 




100 PALETTE 1,0: PALETTE 0,54: PA 


L 300 


IF D$=" " THEN 890 ELSE IF A 


ETTE 2, 36: PALETTE 15,3 8 


SC(D$)<32 THEN 280 


110 HCOLOR 15,0 :HLINE (0,0) -(130 


310 


GOSUB 12 80 'CLEAR COMMAND BO 
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Computer Island Educational Software 



KJi 



ARROW GAMES 
32K Ext. - $21.95 tape/$26.95 disk 
Six menu driven games for young 
children (ages 3-6) to teach direc- 
tions. All games involve using the 
arrow keys ONLY. Games include: 
LADYBUG, BUTTERFLY. ARROW 
MATCH, KALEIDOSCOPE. RABBIT, 
and DOODLE. Colorful graphics. 

FIRST GAMES 

32K Ext. - $24.95 tape/$29.95 disk 
First Games contains 6 menu driven 
programs to delight and teach your 
early learners (ages 3-6). These 
games enrich the learning of colors, 
numbers, lower case letters, shapes, 
memory, visual discrimination and 
counting. 




CLOZE STORIES 

32K Ext. - $19.95 Tape/$24. 95 Disk 
These programs give students prac- 
tice using the popular CLOZE read- 
ing technique. Each program contains 
grade appropriate short stories with 
key missing words to be deduced by 
the student. Available for grades 3. 4, 
5, 6, OR 7. Please specify. 

DRAWING CONCLUSIONS 

32K Ext. - tape $19.95/disk $24.95 
These programs contain short stories. 
Each story has two accompanying 
questions that ask the student to draw 
conclusions from the text. Available 
for grades 3-4 OR 5-6. Please specify. 



LOCATING STORY DETAILS 

32K Ext. - disk only - $24.95 
These programs contain short stories. 
Each has an accompanying picture. 
Questions about story details refer to 
either the text or pictures. The disk 
generated graphics are an integral 
part of these attractive programs. 
Available for grades 2-3 OR 4-5. 
Please specify. 




FOREIGN LANGUAGE GAMES 

32K Ext. - $19.95 tape/$24.95 disk 
(500 words) 
French or Spanish Baseball 

Score base hits or home runs for 
correct answers. You're out if wrong. 
Correct answers supplied. Fun way 
to learn and practice vocabulary. 
PLEASE SPECIFY LANGUAGE. 




PUNCTUATION PRACTICE 

32K Ext. - tape $19.95/disk $24.95 
On screen practice in proper usage 
of the familiar punctuation marks. 
Grades 3-7. 




MATH TUTOR SERIES 

16K Ext. 
These tutorials take the child through 
each step of the example. All pro- 
grams include HELP tables, cursor 
and graphic aids. All allow user to 
create the example, or let the com- 
puter choose. Multi-level. Great 
teaching programs. 

LONG DIVISION TUTOR 

$14.95 tape/$19.95 disk 

MULTIPLICATION TUTOR 

$14.95 tape/$19.95disk 

FACTORS TUTOR 

$19.95 tape/$24.95 disk 

FRACTIONS TUTOR (addition) 

$19.95 tape/$24.95 disk 

FRACTIONS TUTOR (subtraction) 

$19.95 tape/$24.95 disk 

FRACTIONS TUTOR (mult.) 

$19.95 tape/$24.95 disk 

COMPUTER LITERACY 

32K Ext. - $19.95 tape/$29.95 disk 
A computer literacy quiz exclusively 
for the Color Computer. Tests and 
scores from over 60 questions on a 
Hi-res upper and lower case screen. 
Reviews computer literacy and 
beginning programming knowledge. 
Ages 10 and up. 




RAINBOW 

CERTIFICATION 




(718) 948-2748 
Dept. R 227 Hampton Green, Staten Island, N.Y. 10312 

Send (or catalog with complete descriptions. 
Please add SI .00 per order for postage. N.Y. residents, please add proper tax. FREE set of BINARY DICE, including lull directions, with 
orders ot 2 or more items. 



Dealer Inquiries Invited. 



TRS-80 Color Computer 



All Payments in U.S. Funds. 



X 


650 


HLINE(CX*20+150,CY*20+6)-(CX 


320 HPRINT (0,1), "Press ARROWS" 


*20+170,CY*20+26) , PRESET, B 


3 30 HPRINT (1,2), "to select bloc 


660 


FOR DLAY=1 TO 100: NEXT DLAY 


k" 


670 


GOTO 570 


340 HPRINT (0 , 3 ) , "Press SPACE BA 


680 


'MOVE CURSOR, WRAP IF NECESS 


R" 


ARY 




350 HPRINT (1,4), "to set/reset" 


690 


CY=CY-1:IF CY<0 THEN CY=7 


360 HPRINT (0,5), "Press ENTER" 


700 


GOTO 570 


370 HPRINT (1,6), "to put in RAM" 


710 


CY=CY+1:IF CY>7 THEN CY=0 


380 HPRINT (0,7), "Press BREAK" 


720 


GOTO 570 


390 HPRINT (1,8), "to abort" 


730 


CX=CX-l:IF CX<0 THEN CX=7 


400 ON BRK GOTO 1560 


740 


GOTO 570 


410 CH=ASC(D$) :CH=CH-33:OF=61605 


7 50 


CX=CX+l:IF CX>7 THEN CX=0 


+CH*8 


7 60 


GOTO 570 


420 HPRINT (17,22) /'Defining: ":H 


770 


'CHECK IF BLOCK IS SET OR CL 


PRINT (27, 22) , D$ : HPRINT (30 , 22 ) , "A 


EAR 


AND 


SCII=" : HPRINT (36,22), ASC ( D$ ) 


780 


•FLIP IT 


430 FOR Y=0 TO 7 '8 ROWS PER CHA 


790 


BX=2 A (7-CX) 


RACTER 


800 


IF LN(CY) AND BX THEN HPAINT 


440 LN(Y)=PEEK(OF+Y) 'GET CHARAC 


(155+CX*20,11+CY*20) ,0,1 ELSE HP 


TER 


AINT(155+CX*20,11+CY*20) ,2,1 


450 'DETERMINE WHICH GRID BLOCKS 


810 


IF LN(CY) AND BX THEN LN(CY) 


TO SET 


=LN(CY) AND (255-BX) : GOTO 570 


460 IF LN(Y) AND 128 THEN HPAINT 


820 


LN(CY)=LN(CY) OR BX:GOTO 570 


(155,Y*20+10) ,2,1 


830 


'STORE CURRENT CHARACTER IN 


470 IF LN(Y) AND 64 THEN HPAINT ( 


RAM 




175,Y*20+10) ,2,1 


840 


FOR Y=0 TO 7 


480 IF LN(Y) AND 3 2 THEN HPAINT ( 


850 


POKE 61605+CH*8+Y,LN(Y) 


195,Y*20+10) ,2,1 


8 60 


NEXT Y 


490 IF LN(Y) AND 16 THEN HPAINT ( 


870 


HCLS:GOSUB 12 80: GOTO 130 


215,Y*20+10) ,2,1 


880 


'OTHER COMMANDS 


500 IF LN(Y) AND 8 THEN HPAINT (2 


890 


GOSUB 1280 


35,Y*20+10) ,2,1 


900 


HPRINT (1,0), "OTHER COMMANDS 


510 IF LN(Y) AND 4 THEN HPAINT (2 


ii 




55,Y*20+10) ,2,1 


910 


HPRINT (1,1) ,"<S>ave Font" 


520 IF LN(Y) AND 2 THEN HPAINT (2 


920 


HPRINT (1,2) ,"<L>oad Font" 


75,Y*20+10) ,2,1 


930 


HPRINT (1,3), "<I>nstructions 


530 IF LN(Y) AND 1 THEN HPAINT(2 


it 




95,Y*20+10) ,2,1 


940 


HPRINT (1,4) ,"<B>ack to Main 


540 NEXT Y 


ii 




550 CX=0 'INITIALIZE CURSOR TO 

,0 

560 CY=0 


950 
ii 


HPRINT (1,5) ,"<D>isplay font 


960 


HPRINT (l,6),"<E>nd Program" 


570 HLINE(CX*20+150,CY*20+6)-(CX 


970 


D$=INKEY$:IF D$="" THEN 970 


*20+170,CY*20+26) ,PSET,B 


980 


IF D$="D" OR D$="d" THEN 131 


580 E$=INKEY$ 







590 IF E$=CHR$(94) THEN 690 'UP 


990 


IF D$="B" OR D$="b" THEN GOS 


ARROW 


UB 1280: GOTO 190 


600 IF E$=CHR$(10) THEN 710 'DOW 


1000 IF D$="E" OR D$="e" THEN PO 


N ARROW 


KE 65496, :RGB: CLS : END 


610 IF E$=CHR$(8) THEN 730 'LEFT 


1010 IF D$="L" OR D$="l" THEN PO 


ARROW 


KE 65496, 0:WIDTH 40 :PRINT"LOAD F 


620 IF E$=CHR$(9) THEN 750 'RIGH 


ONT": INPUT" FILENAME (NO EXTENSIO 


T ARROW 


N)" 


F$:F$=F$+".FNT":LOADM F$:POK 


630 IF E$=" " THEN 790 'SPACE BA 


E 65497, 0:HSCREEN2:GOSUB 1280:GO 


R 


TO 130 


640 IF E$=CHR$(13) THEN 840 ' ENT 


1020 IF D$="S" OR D$="s" THEN PO 


ER 


KE 654 9 6,0: WIDTH 40 : PRINT" SAVE F 
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ONT": INPUT" FILENAME (NO EXTENSIO 

N) " ;F$:F$=F$+" .FNT":SAVEM F$,616 

05, 62364, 0:POKE 65497 ,0 :HSCREEN2 

:GOSUB1280:GOTO 13)3 

1030 IF D$="I" OR D$="i" THEN 10 

40 ELSE 970 

1040 WIDTH 40 

1050 PRINT "FONT CREATOR" 

1060 PRINT 

1070 PRINT" This program will 

create and save a" 

1080 PRINT"new font for the HPRI 

NT command to use" 

1)390 PRINT" on the COCO 3 HI -RES 

screens. It is" 

1100 PRINT"very easy to use. At 

the main screen" 
1110 PRINT"enter the character y 
ou wish to define," 
1120 PRINT"or press <SPACE> for 
other commands." 
1130 PRINT"To define, simply use 

the arrow keys to" 
1140 PRINT"move to the desired b 
lock on the grid." 
1150 PRINT"Press <SPACE> to eith 
er set or clear" 

1160 PRINT"the block that is fla 
shing. When you" 

1170 PRINT"have defined the char 
acter completely," 
1180 PRINT"press <ENTER> to cont 
inue. After you" 
1190 PRINT"have defined the enti 
re font, use the" 

1200 PRINT"<S>ave command to sav 
e it to disk. " 

1210 PRINT"Then, when you want t 
o use the new font" 
1220 PRINT"simply do a LOADM to 
load it in. DO NOT" 
1230 PRINT"EXECUTE!" 
1240 PRINT 

1250 PRINT "Press a key to begin 
> ii 

12 60 D$=INKEY$:IF D$="" THEN 12 6 
ELSE HSCREEN2:G0SUB 1280: GOTO 
130 

1270 'CLEAR COMMAND BLOCK 

1280 HPUT(0,0)-(130,88) ,1,PSET 

1290 RETURN 

1300 POKE 65496,0: RGB: WIDTH 40 : C 

LS : END 

1310 HCLS 

1320 HPRINT (0,10),T1$ 

1330 HPRINT (0,12),T2$ 

13 40 HPRINT (0,14) ,T3$ 

1350 HPRINT (0,19) , "Press any ke 
y when ready to continue." 



1360 

1370 
1380 
1390 
1400 



1410 
F» 

1420 
1430 
1440 
1450 
1460 
1470 



D$=INKEY$:IF D$="" THEN 13 6 

HCLS:GOSUB 1280: GOTO 130 
GOSUB 1280 

HPRINT (0,0), "Press letter" 
HPRINT (2,1)," for character 

HPRINT (0,4), "A B C D E 



HPRINT (0,5) ,CHR$(96) 
HPRINT (3,5) , CHR$(12 3) 
HPRINT (6,5) ,CHR$(124) 
HPRINT (9,5) ,CHR$(125) 
HPRINT (12,5) ,CHR$(126) 
14/)!) HPRINT (15,5) ,CHR$(127) 
1480 A$=INKEY$:IF A$<"A" OR A$>" 
F" THEN 1480 

1490 IF A$="A" THEN D$=CHR$(96) 
IF A$="B" THEN D$=CHR$(123) 
THEN D$=CHR$(124) 
THEN D$=CHR$(12 5) 
THEN D$=CHR$(12 6) 
THEN D$=CHR$(127) 



1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 



IF A$="C" 
IF A$="D" 
IF A$="E" 
IF A$="F" 
GOTO 310 
ON BRK GOTO 
HCLS 

GOSUB 1280 
GOTO 130 



1300 



/R\ 




WE'VE CHOSEN THE BEST OF OVER 600 PROGRAMS (OVER 5 YEARS 
OF ACCUMULATING FINE SOFTWARE), AND PACKAGED THEM FOR 
YOU. 10 TO 12 PROGRAMS EACH PACKAGE. COLOR COMPUTER I, II 
or III. SPECIFY TAPE OR DISK. ONLY '29" EACH PACKAGE! 



#1 HomeMgmt I 

Budget 

Checkbook Balancer 
Cost of Living 
Tinycalc Spreadsheet 
Electronic Dalebook 
Account Manager 
Stock Market 
Word Processor 
LotteryAnalyst 
Coco Database 
CocoTormmal 
Bartender 

#t Adventures 

Treasures ol Barsoom 

Killer Mansion 

Collogo Adventure 

Coco-Torrostnal 

Escape 

ZectorAdvenluro 

Skid Row 

Quest 

Naughido 

Haunted House 



#7 Utilities I 

Cassello Merge 
Ccco Monitor 
Tape Analysis 
ML to Data 
High TbxI Mod. 
High Text 
Program Packer 
Easy Basic 
Key Repeat 
Full Screen Editor 
ROM Copy 
Basic RAM 



#2 HomeMgmt I 

Video Cassottos 
Home Product Eva! 
E lee. Gas & Water 
Baseball Manager 
CarManagor 
Ham Radio Log 
Home Inventory 
Personal Oiroctory 
Recipe Machine 
OiskLabeler 
Password Scramblor 
O'Sk Oir Pnnl 



#3 Education 
Flash Card 
Spanish Lessons 
Typing Tutor 
Creativity Tost 
Anlh Football 
CostolLiving 
MathTutorst.2 
Trigonometry Tutor 
Typing Game 
WordTosIs 
Talking Alphabet 
Clown Dunk Math 



#5 Business Helper #6 Games 



Workmate 
Word Processor 
Spread Shoot 
Calendar 

Accounts Receivable 
Accounts Payable 
Income Property 
Mail List 

Small Business Helper 
Slock Charting 
Job Log 
Asset Manager 

#8 Utilities II 

DtokDirProieciw 
Drr Pack A Sort 
Disk Zappor 
RollOul 
Doss Boss 
Disk Backup 
51*24 Edilor 
51 '24 Scison 
Aulocopy 
Fnstsofl 
10 Ef ioi Ignore* 
Toil Screen P-lnl 



Tiok 

Galactic Conquers! 

Wa-lofds 

Tha Power Swoid 

Sieps 

Robol Bomber 

Force FiokJ 

Rat Attack 

Caterpillar Cave 

Meteor 



#9 Machine Lang.Tut. 

Basic Compiler 
MLTulonatPl 1 
MLTu!orialPl.2 
MLTulonalPt 3A,3B 
MLTutonalPl 4 
ML Tutorial Pi. 5 
MLTutonalPl 6 
MLTulonalPl.7 
MLTutonalPl 8 
MLT Dictionary 
Coco Technical Look 
Coco TechnicalLook Pis 1-3 






29 95 EACH SET 

* Special This Month • 

Buy 2 Packages and get 1 

FREE 



/^ 



T & D Subscription Software ■ 2490 Miles Standish Dr. • Holland, Ml 49424 • (616) 399-9648 
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PRINTER UTILITY 



The DMP-105 
Takes a Bow 

By Drue King 



After experimenting with the 
DMP-105 printer, I thought it 
was time for everyone to know 
just what this little printer can do. 

DMP-105 Dumper, a 16K Extended 
BASIC program, prints a dot-for-dot 
picture with a choice of 1V$ by 3 4 / 8 inch 
or 6% by 1 [ A inch picture in normal or 
reversed print (black on white or white 
on black) at a specified baud rate (600 
or 2400). 

Lines 10 and 20 set a variable and a 
table. Lines 30 through 1 10 ask a series 
of questions about the type of picture 
you want. Line 90 asks for the graphics 
page start address, so your graphic 
picture can be on any graphics page. 
The graphics page start addresses are 
listed in the memory map in the back 
of your Color BASIC manual. 

After setting the correct size, Line 140 
goes to the appropriate print routine. 
So Dumper can be converted to another 
printer, all printer control codes are 
listed in Table 1. 



through 210 for the large dump section 
and lines 330 through 340 for the small. 

Essentially, all the program does is, 
after printing a row of seven dots, check 
to see if the eighth bit of the present byte 
is turned on (if the byte's value is greater 
than 128) and send the right character 
CHR$(192) to print a dot and 
CHR$(128) for no dot, depending on 
whether you have picked a normal or 
reversed screen dump. 

In the DMP-105's graphics mode, 
any number sent to the printer that is 
less than 128 is considered a control 
code. We have to add 128 to our graph- 
ics values before they are sent to the 
printer. This is done in lines 170 and 
300. 

Most of the large screen dump section 
is an altered version of Mr. Kromeke's 
Large Screen Dump in "Pictures Perfect 
with Prowriter" (RAINBOW, May 1985). 
If you have questions on how the graph- 
ics are expanded, that article explains it 
in detail. 



Table 1 




Printer Control Codes 




Code 


Function 


CHR$(13) 


Carriage return 


CHRSCI8) 


Set graphics mode 


CHR$(27);CHR$(19) 


Set standard font 


CHR$(27);CHR$(14) 


Start elongation mode 


CHR$(27);CHR$(90);CHR$(1); 


V 72 inch line feed 


CHR$(27);CHR$(16);CHR$(0);CHR$(143); 


Position head to dot position 143 


CHR$(27);CHR$(16);CHR$(0);CHR$(47); 


Position head to dot position 47 



The problem with printing a correct 
screen dump with the DMP-105 is the 
print head is only seven pins high while 
a byte is eight bits. We have to print a 
row of seven dots, then return and print 
the eighth row. This is done in lines 200 

Drue King is 21 years old and lives in 
Lanesville, Indiana. He is a graduate of 
Prosser Vocational School and has 
worked with the Color Computer for 
five years. 



After the printer is finished, the 
screen should switch back to text and 
say "Done" in the top-left corner of the 
screen. You should have a complete, 
centered picture. 



If you have any problems or ques- 
tions, you can contact me at RR #1 
Highway 62, Lanesville, IN 47136, 
phone (8 1 2) 952-2467. Please enclose an 
SASE for a reply. □ 



104 



THE RAINBOW May 1987 



Uncompromisin g per formance at an incredible price. 

The Tandy 6 
Color Computer 3 

More colors, superb graphics, 
greater power for only $ 219 95 




LU'H 




I II I I .1 ,1 .> I 
■ I I I I 




Our most powerful 
Color Computer 

Finally, the ideal computer for 
your family: our most advanced 
Color Computer ever The Color 
Computer 3 is great for small 
business and home applications. 
You get the advantages of a high- 
priced computer — without the 
high price! 

A rainbow at your 
fingertips 

The Color Computer 3 fea- 
tures 12SK memory (expandable 
to 512K), giving you greater 
programming power. With the 
CM-8 High-Resolution Monitor 
(26-3215), you can create razor- 
sharp graphics using 64 colors. 



The Color Computer 3's Ex- 
tended BASIC features 21 new 
commands that allow you to al- 
ternate screens, colors, and 
backgrounds — all at a higher 
resolution and with a greater va- 
riety of colors than any previous 
Color Computer. 

Compatible and 
expandable 

Best of all, the new Color 
Computer 3 is compatible with 
software and accessories de- 
signed for the Color Computer 
2, including a wide selection of 
educational, personal-manage- 
ment and game programs. Ex- 
pand with a modem or printer, 
or add a disk drive to create a 



sophisticated disk system and 
open the door to a library of ad- 
vanced disk software. 

The Color Computer 3 
(26-3334) is your affordable alter- 
native. See it todav at Radio Shack. 



Send me an RSC-17B Computet Catalog. 



Mail To: Radio Shack. Depi. 87-A-719 
300 One Tandy Center, Fori Worth. TX 76102 



Name . 



Address . 

City 

Slale 

Zip 



Radio /hack 



Price applies al Radio Shack Compulei Centers arid participating stores and dealers. 
Monitor and accessories sold separately. 
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The listing: DUMPL05 



DMP-105 DUMPER 
BY DRUE KING 



2 ' 

3 ' 

4 ■ 

10 DIMD(15) :CL=1 

20 FOR X=0 TO 15: READ A:D(X)=A:N 

EXT X 

30 CLS:PRINT@9,"PMODE4 DUMP" 

40 : PRINT: PRINT" 1) (3 1/8) X (3 

4/8)":PRINT" 2) (6 3/8) X (7 1/ 
8 ) " : PRINT : INPUT"SIZE" ; SZ 
50 IF SZOl AND SZ<>2 THEN 40 
60 PRINT: PRINT" 1) NORMAL " : PRIN 
T" 2) reverse": PRINT: INPUT" OUTP 
UT";OP 

70 IF OPOl AND 0PO2 THEN 60 
80 PRINT@240,"1) 600";:PRINT@272 
, "2) 2 400";: PRINT© 3 3 6, "BAUD RATE 
"; '.INPUT PT:IF PT<>1 AND PT<>2 T 
HEN 80 ELSE IFPT=1THEN POKE150,8 
8 ELSE POKE150,18 

90 PRINT: INPUT"GRAPHICS PAGE STA 
RT ADD.", -AD 
100 AD=AD+31:KE=AD-1 
11/3 PRINT: PRINT" ALIGN PAPER TO 

TOP OF RIBBON": PRINT" A 

ND HIT ENTER"; 

120 A$=INKEY$:IFA$=""THEN120 
130 PRINT#-2,CHR$(18) ;:SCREEN1,1 
140 IF SZ=1 THEN PRINT#-2 , CHR$ (2 
7) ;CHR$(19) :GOTO270 ELSE PRINT# 
-2,CHR$(27) ;CHR$(14) :GOTO150 
150 FOR SP=1 TO 20:PRINT#-2,CHR$ 
(13) ; .'NEXT 

160 GOSUB350:FOR AD=KE+1 TO KE+6 
113 STEP32:P=PEEK(AD) :J=D( (P AND 

15)): IF 0P=1 THEN J=255-J 
170 IF J<128 THEN J=J+128 
180 PRINT#-2,CHR$(J) ;:NEXT 
190 GOSUB350 

200 PRINT#-2,CHR$(27) ;CHR$(90) ;C 
HR$(l);:FOR GN=KE+1 TO KE+6113 S 
TEP3 2:P=PEEK(GN) :P=D((P AND 15)) 
:IF P>63 AND OP=l THEN PRINT#-2, 
CHR$(12 8) ; :NEXT:GOTO220ELSEIF OP 
=1 THENPRINT#-2,CHR$(192) ;:NEXT: 
GOTO220 

210 IF P>63 THENPRINT#-2,CHR$(19 
2);:NEXT ELSE PRINT#-2 , CHR$ (128) 

;:NEXT 

2 20 PRINT#-2,CHR$(13) ;:GOSUB3 50: 
FOR BA=KE+1 TO KE+6113 STEP 32 :P 
=(PEEK(BA) AND 240) /16 : J=D (P) : IF 

0P=1 THEN J=2 55-J 
230 IF J<128 THEN J=J+128 



240 PRINT#-2,CHR$(J) ; -.NEXT 

250 GOSUB3 50:GOSUB3 30:PRINT#-2,C 

HR$(13) ; 

2 60 KE=KE-l:CL=CL+l:IF CL=33 THE 
N SCREEN0 , 1 : CLS : PRINT@0 , " DONE" : S 
TOP ELSE GOTO160 

270 F0RSP=1T03 7:PRINT#-2,CHR$(13 

) ; : NEXT 

280 PRINT#-2,CHR$(27) ;CHR$(16) ;C 

HR$(0) ;CHR$(143) ; 

290 FOR AD=KE+1 TO KE+6113 STEP3 

2:J=PEEK(AD) : IF OP=l THEN J=255- 

J 

300 IF J<128 THEN J=J+128 

310 PRINT#-2,CHR$(J) ; :NEXT 

320 PRINT#-2,CHR$(27) ;CHR$(16) ;C 

HR$(0) ;CHR$(143) ;:GOSUB 3 30: PRIN 

T#-2 , CHR$ ( 13 ) ; : KE=KE-1 : CL=CL+1 : I 

F CL=3 3 THEN SCREEN0 , 1 : CLS : PRINT 

@0," DONE": STOP ELSE GOTO 2 80 

3 30 PRINT#-2,CHR$(27) ;CHR$(90) ;C 
HR$(1);:F0R GN=KE+1 TO KE+6113 S 
TEP32:P=PEEK(GN) : IF P>=128 AND 
P=l THEN PRINT#-2,CHR$(128) ;:NEX 
T: RETURN ELSE IF OP=l THEN PRIN 
T#-2,CHR$(192) ; : NEXT: RETURN 

340 IF P>=128 THEN PRINT#-2 , CHR$ 

(192) ;:NEXT: RETURN ELSE PRINT#-2 

, CHR$ ( 128 ) ; : NEXT : RETURN 

350 PRINT#-2,CHR$(27) ;CHR$(16) ;C 

HR$(0) ;CHR$(47) ; : RETURN 

3 60 DATA 0,3,12,15,48,51,60,63,1 

92,195,204,207,240,243,252,255 



/R\ 



Two- Liner Contest Winner . . . 

If you change the PRINTS to PRINT8-2, you can use 
this routine to print scrambled words. Just enter the 
word you want to scramble. 

The listing: 

10 IF Q=0 THEN CLS: INPUT "ENTER 
JUMBLE "; A$ : L= LEN ( A$ ): FOR X=l TO 
L:B$(X)=MID$(A$,X,1) :NEXT X:FOR 
Z=l TO L ELSE FOR Z=l TO L 
20 Q=1:R=RND(L) : IF T(R)=1 THEN 2 
ELSE T(R)=1: PRINT B$(R);:NEXT 
Z:FOR Y=l TO L:T (Y)=0 :NEXT Y:PRI 
NT " " ; : GOTO 10 

Matt Hazard 
Columbia Station. OH 



(For [his winning two-liner contest entry, the author has been sent copies >>i 
both The Second Rainbow Book of Simulations and its companion Tlie Set and 
Rainbow Simulations Tape.) 
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Radio Shack has the** 




♦♦♦best of everything! 



Unleash the true potential of your 
Color Computer with accessories 
from Radio Shack. 

Add a pair of joysticks (A, 26-3008, 
Pair/$ 19.95) for' fast 360° movement 
or our Deluxe Joystick (B, 26-3012, 
.$29.95) that adjusts to your touch, al- 
lowing '"fine tuning". For maximum 
control of games and graphics, simply 
"roll" the Color Mouse (C, 26-3025,' 
$49.95) across a tahletop to accu- 
rately position the cursor. 

Maximize your Color Computer's 
power with the Multi-Pak Interface 
(D, 26-3124, $99,95). You can change 
programs instantly using the selector 
switch, or under program control. 



And you can connect disk drives or 
other accessories, too. 

Here are two more great-sounding 
accessories! The Sound/Speech Car- 
tridge (E, 26-3144, $79.95) adds 
three-voice sound and text to speech. 
The Orchestra-90 CC (F, 26-3143, 
$79.95), lets you create electronic 
music and sound effects. 

The 300-baud DC Modem Pro- 
gram Pak (G, 26-2228, $89.95) makes 
it possible to join the telecommuni- 
cations wave. Since the modem and 
software are built in, you can access 
information services by phone. Need 
more memory? Hard disk storage is 
yours with the Hard Disk Interface 
(H, 26-3145, $129.95)*. 



Come in to your local Radio Shack 
today for the accessories that make 
your Color Computer even more of a 
high performer! 



r 

■ 



Send me an RSC-17B 
Computer Catalog 



HMail To: Radio Shack, Depl. 87-A-718 
300 One Tandy Cenier, Fori Worth, TX 76102 

Name 



■ 
I 



City 

Slate . 
Zip — 



Phone . 



Radio /hack 



• Requires 64K. Mulh-Pak Interlace, (loppy disk with controller and OS-9 (2.0 or later). Prices apply at participat- 
ing Radio Shack Computer Centers and participating Radio Shack stores and dealers Orcheslra-90/TM Soil- 
ware Allair. 0S-9/TM Microwatt Corp, 
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PRINTER UTILITY 



A program to set up your SG-10 



The Printer That Came in 
From the Code 



By David R. Jenkins 



One of the problems with owning 
a printer as versatile as the Star 
SG-10 is keeping track of all the 
different codes for different type sizes, 
fonts, spacing, etc. In short order, your 
owner's manual wears out! 

This program will set up the printer 
for you. The program is completely 
menu-driven, so it is nearly self- 
explanatory. It also shows how you can 
set up a multiple-level, menu-driven 
program easily. 

The main menu allows you to select 
different groups of functions. When you 
select a group of functions, you receive 
another menu of specific functions. You 
may then see yet another small menu of 
options. 

Important: Set the baud rate first. 
This program sends codes to your 
prinler, and the baud rate must be 
correct or the entire program will either 
work incorrectly, or freeze. If you have 
a switcher on your printer port, be sure 
it is in the printer position. 

Here is a rundown of the program 
options. Option 1 sets the baud rate of 
the computer. The program accepts the 
baud rate as an actual number (e.g., 
600) rather than a meaningless code 
(such as 88). Enter a speed of 600, 1200, 
2400. 4800, or 9600 (no commas). Other 
entries are rejected. You may have to 

Dave Jenkins is an engineer at WNIN 
FMjTV in Evansville, Indiana, and has 
been using his Color computers for six 
years. 



slightly adjust the values in lines 230 
through 270 for your system. 

Option 2 sets the type size. Table 1 
shows the widths that are possible. 
Notice that "expanded" is not a size by 
itself, but doubles the size of whatever 
the printer is set for. So, you can have 
expanded pica, expanded elite, or ex- 
panded condensed (which may sound 
ridiculous but actually looks pretty 
good). "Never Mind" returns you to the 
main menu. 



Table 1 : Characters 


per inch 




for type sizes 






Normal 


Expanded 


Pica 


10cpi 


5 cpi 


Elite 


12cpi 


6 cpi 


Condensed 17cpi 


8.5 cpi 


(cpl 


- characters per inch) 



Option 3 selects the type font, or 
style. Many of the fonts arc on/ off, and 
you are asked if you are turning the font 
on or off. Underlining is also included 
in this set of options. 

Option 4 allows you to set the top, 
bottom, left and right margins on the 
printer. For the top, bottom and left 
margins, simply enter the value of lines 
or spaces you want. 

The printer handles the right margin 
differently. You have to take the current 
line length and subtract the amount of 
margin, to get the proper value. For 
instance, with pica type, the line length 



is 80. If you want a right margin of 10 
spaces, you must give the program a 
value of 70. Table 2 gives the line lengths 
for regular size printer paper. 



Table 2: Line lengths for 
8.5 inch wide paper 



Characters per line 



Pica 
Elite 
Condensed 



80 

96 

136 



Miscellaneous functions is a catchall 
for options that do not seem to fit 
anywhere else. As it turned out, the only 
function I wanted was the slashed zero 
option. 

Option 6 sets the line spacing. You 
can set the spacing to practically any 
value in increments down to '/216th of an 
inch. The normal setting is '/(> inch. 

Option 7 reinitializes the printer. 
Then the printer is set up exactly as 
when you power up. Note the "top of 
form" is set where the paper is located. 
If it isn't at the top, the top of form will 
be set incorrectly. Do a form feed from 
the printer control keys before a reini- 
tialization. 

I did not include many of the options 
available because they are too special- 
ized (graphics setups, for example). 
However, if you use these functions 
frequently, you can add them to the 
program. 
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This program demonstrates how 
simply you can make even a compli- 
cated program easy to use. You can 
layer menus on top of menus to cover 
every option. The CoCo 3 gives you an 



easy way to get to the main menu with 
the BREAK key trap. You set the BREAK 
key trap (ON BRK GOTO . . .) to the first 
line on your main menu. Then, anytime 
you want to get to the top menu, all you 



^r 



do is press the BREAK key. 

(Questions about this program may 
be addressed to the author at 1418 E. 
Illinois St., Evansville, IN 47711. Please 
enclose an SASEfor a reply.) □ 







960 .. . 


...249 




200 .. 


....66 


1150 .. 


....77 




400 .. . 


...220 


1310 .. 


...141 




620 .. 


....45 


1480 . . 


....54 




770 


.. 217 


END 


...96 









The listing: SG105ET 

10 CLS 

20 PRINTTAB(8) ;"SG-10 PRINTER SE 

T-UP" 

30 PRINT 

40 PRINTTAB (5 ) ;"1. SET COMPUTER 

BAUD RATE" 

50 PRINTTAB(5) ;"2. SET TYPE SIZE 
ii 

60 PRINTTAB(5) ;"3. SET TYPE FONT 
ii 

70 PRINTTAB(5) ;"4. SET MARGINS" 

80 PRINTTAB (5) ; "5. SET MISC FUNC 

TIONS" 

90 PRINTTAB(5) ;"6. SET LINE SPAC 

ING" 

100 PRINTTAB(5) ;"7. RE-INITIALIZ 

E PRINTER" 

110 PRINTTAB(5) ;"8. END PROGRAM" 

120 PRINT 

130 PRINTTAB(5) /"SELECTION — >"; 

140 I$=INKEY$:IF 1$="" THEN 140 

150 IF VAL(I$)<1 OR VAL(I$)>8 TH 

EN 140 

160 PRINT 1$ 

170 ON VAL(I$) GOSUB 200,290,480 

,960,12 60,13 70,1660,1670 

180 PRINT#-2,CHR$(7) ; 

190 GOTO 10 

200 CLS 

210 INPUT "BAUD RATE"; BR 

2 20 IF BRO600 AND BRO1200 AND 

BRO2400 AND BRO4800 AND BR<>9 6 

00 THEN PRINT"INVALID BAUD RATE. 

TRY AGAIN.": PRINT :GOT02 10 
230 IF BR=600 THEN POKE 150,88:R 
ETURN 

240 IF BR=1200 THEN POKE 150,41: 
RETURN 

250 IF BR=2400 THEN POKE 150,18: 
RETURN 

2 60 IF BR=4800 THEN POKE 150, 6 :R 
ETURN 

270 POKE 150,1 
280 RETURN 



290 CLS : PRINTTAB ( 9 ) "SET TYPE SIZ 

E" 

300 PRINT 

3 10 PRINTTAB ( 5 ) ; " 1 . 

3 20 PRINTTAB (5) ;"2. 

3 30 PRINTTAB (5) ;"3. 

340 PRINTTAB (5) ;"4. 

3 50 PRINTTAB (5) ;"5. 



PICA" 
ELITE" 
CONDENSED" 
EXPANDED ON" 
EXPANDED OFF 



3 60 PRINTTAB (5) ; "6. NEVER MIND" 
370 PRINT 

380 PRINTTAB(5) /"SELECTION — >" ; 

390 I$=INKEY$:IFI$=""THEN390 

400 IF VAL(I$)<1 OR VAL(I$)>6 TH 

EN 3 90 ELSE PRINT 1$ 

410 IF VAL(I$)=6 THEN RETURN 

420 ON VAL(I$) GOTO 430,440,450, 

460,470 

4 30 PRINT#-2,CHR$(27) ;CHR$(66) ;C 
HR$(1) ; : RETURN 

440 PRINT#-2,CHR$(27) ;CHR$(66) ;C 

HR$(2) ; : RETURN 

450 PRINT#-2,CHR$(27) ;CHR$(66) ;C 

HR$ ( 3 ) ; : RETURN 

460 PRINT#-2,CHR$(27) ;CHR$(87) ;C 

HR$(1) ;: RETURN 

470 PRINT#-2,CHR$(27) ;CHR$(87) ; C 

HR$(0) ; : RETURN 

480 CLS : PRINTTAB (9 ); "SET TYPE FO 

NT" 

490 

500 

510 

520 



PRINT 

PRINTTAB (5) ;"1 
PRINTTAB (5) ;"2 
PRINTTAB (5) ;"3 

QUALITY" 

530 PRINTTAB (5) ;"4 



NORMAL" 
ITALIC" 
NEAR LETTER 

PROPORTIONAL 



540 PRINTTAB ( 5) ; "5. DOUBLE-STRIK 

E" 

550 PRINTTAB ( 5 );" 6 . EMPHASIZED" 

560 PRINTTAB (5) ; "7. UNDERLINING" 

570 PRINTTAB (5) ; "8. NEVERMIND" 

580 PRINT 

590 PRINTTAB(5) /"SELECTION — >" ; 

600 I$=INKEY$:IF I$=""THEN 600 

610 IF VAL(I$)<1 OR VAL(I$)>8 TH 

EN 600 ELSE PRINT 1$ 

620 IF VAL(I$)=8 THEN RETURN 

630 ON VAL(I$) GOTO 640,650,660, 

720,780,840,900 

640 PRINT#-2,CHR$(27) ;CHR$(53) ;: 

RETURN 

650 PRINT#-2,CHR$(27) ;CHR$(52) ;: 
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RETURN 

660 CLS:PRINT"NEAR LETTER QUALIT 

Y.. ." 

670 PRINT" . . .ON (1)" 

680 PRINT" . . .OFF (2)" 

690 I$=INKEY$:IFI$=""THEN690 ELS 

E IF VAL(I$)<1 OR VAL(I$)>2 THEN 

690 ELSE PRINT 1$ 
700 IF VAL(I$)=1 THEN PRINT#-2,C 
HR$ ( 27 ) ; CHR$ ( 66 ) ; CHR$ ( 4 ) ; : RETURN 
710 PRINT#-2,CHR$(27) ;CHR$(66) ;C 
HR$(5) ;: RETURN 

720 CLS : PRINT" PRO PORTIONAL. . ." 
730 PRINT" . . .ON (1)" 
740 PRINT" . . .OFF (2)" 
750 I$=INKEY$:IFI$=""THEN750 ELS 
E IF VAL(I$)<1 OR VAL(I$)>2 THEN 

750 ELSE PRINT 1$ 
760 IF VAL(I$)=1 THEN PRINT#-2,C 
HR$(27) ;CHR$(112) ;CHR$(1) ; :RETUR 
N 
770 PRINT#-2,CHR$(27) ;CHR$(112) ; 

CHR$(0) ; : RETURN 

780 CLS:PRINT"DOUBLE-STRIKE. . . " 

790 PRINT" . . .ON (1)" 

800 PRINT" . . .OFF (2) " 

810 I$=INKEY$:IFI$="" THEN 810 E 

LSE IF VAL(I$)<1 OR VAL(I$)>2 TH 

EN 810 ELSE PRINT 1$ 

820 IF VAL(I$)=1 THEN PRINT#-2,C 

HR$(27) ;CHR$(71) ;: RETURN 

830 PRINT#-2,CHR$(27) ;CHR$(70) ;: 

RETURN 

840 CLS:PRINT"EMPHASIZED. . ." 

850 PRINT" . . .ON (1)" 

860 PRINT" . . .OFF (2)" 

870 I$=INKEY$:IFI$="" THEN 870 E 

LSE IF VAL(I$)<1 OR VAL(I$)>2 TH 

EN 870 ELSE PRINT 1$ 

880 IF VAL(I$)=1 THEN PRINT#-2,C 

HR$ ( 27 ) ; CHR$ ( 69 ) ; : RETURN 

890 PRINT#-2,CHR$(27) ;CHR$(70) ;: 

RETURN 

900 CLS : PRINT"UNDERLINING. . . " 

910 PRINT" . ..ON (1)" 

920 PRINT" . . .OFF (2)" 

930 I$=INKEY$:IFI$=""THEN 930 EL 

SE IF VAL(I$)<1 OR VAL(I$)>2 THE 

N 930 ELSE PRINT 1$ 

940 IF VAL(I$)=1 THEN PRINT#-2,C 

HR$(27) ;CHR$(45) ;CHR$(1) ;:RETURN 

950 PRINT#-2,CHR$(27) ;CHR$(45) ;C 

HR$(0) ;: RETURN 

960 CLS :PRINTTAB( 12) /"MARGINS" 

970 PRINT 

980 PRINTTAB(5) ;"1. TOP" 

990 PRINTTAB(5) ;"2. BOTTOM" 

1000 PRINTTAB ( 5 ) ; " 3 . CANCEL TOP 

& BOTTOM" 



1010 PRINTTAB (5) ; "4. LEFT" 

1020 PRINTTAB (5) 7 "5. RIGHT" 

1030 PRINTTAB (5) ; "6. NEVER MIND" 

1040 PRINT 

1050 PRINTTAB (5) ; "SELECTION — >"; 

1060 I$=INKEY$:IFI$=""THEN1060 E 

LSE IF VAL(I$)<1 OR VAL(I$)>6 TH 

EN 1060 ELSE PRINT 1$ 

1070 IF VAL(I$)=6 THEN RETURN 

1080 ON VAL(I$) GOTO 1090,1130,1 

170,1180,1220 

1090 CLS 

1100 INPUT"LINES FOR TOP MARGIN" 

;TM 

1110 IF TM<0 OR TM>255 THEN PRIN 

T"INVALID MARGIN SELECTION. ": PRI 

NT:GOTO1100 

1120 PRINT#-2,CHR$(27) ;CHR$(82) ; 

CHR$(TM) ;: RETURN 

1130 CLS 

1140 INPUT" LINES FOR BOTTOM MARG 

IN";BM 

1150 IF BM<0 OR BM>2 55 THEN PRIN 

T" INVALID MARGIN SELECTION. ": PRI 

NT:GOTO1140 

1160 PRINT#-2,CHR$(27) ;CHR$(78) ; 

CHR$(BM) ;: RETURN 

1170 PRINT#-2,CHR$(27) ;CHR$(79) ; 

: RETURN 

1180 CLS 

1190 INPUT"SPACES FOR LEFT MARGI 

N";LM 

1200 IF LM<0 OR LM>50 THEN PRINT 

"INVALID MARGIN SELECTION. ": PRIN 

T:GOTO1190 

1210 PRINT#-2,CHR$(27) ;CHR$(77) ; 

CHR$(LM) ;: RETURN 

1220 CLS 

1230 INPUT"SPACES FOR RIGHT MARG 

IN";RM 

1240 IF RM<0 OR RM>132 THEN PRIN 

T"INVALID MARGIN SELECTION. ": PRI 

NT:GOTO12 30 

1250 PRINT#-2,CHR$(27) ;CHR$(81); 

CHR$(RM) ; : RETURN 

12 60 CLS : PRINTTAB ( 4 ) ; "MISCELLANE 
OUS FUNCTIONS" 

1270 PRINT 

1280 PRINTTAB ( 5 );" 1 . ZERO WITH S 

LASH" 

1290 PRINTTAB (5) ; "2. ZERO WITHOU 

T SLASH" 

1300 PRINTTAB (5) ; "3. NEVER MIND" 

1310 PRINT 

13 20 PRINTTAB (5) ; "SELECTION— ->» ; 
1330 I$=INKEY$:IF 1$="" THEN 133 
ELSE IF VAL(I$)<1 OR VAL(I$)>3 

THEN 1330 ELSE PRINT 1$ 
1340 IF VAL(I$)=3 THEN RETURN 
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1350 


IF VAL(I$)=1 THEN PRINT#-2 , 


CHR$(27) ;CHR$(92) ;CHR$(1) ;:RETUR 


1360 


PRINT#-2,CHR$(27) ;CHR$(92) ; 


CHR$(0) ; -.RETURN 


1370 


CLS : PRINTTAB ( 10 ) ; "LINE SPAC 


ING" 




1380 


PRINT 


1390 


PRINTTAB (5) ;"1. SET TO 1/8 


INCH" 


1400 


PRINTTAB (5) ; "2. SET TO 7/72 


INCH" 


1410 


PRINTTAB (5) ; "3. SET TO 1/6 


INCH" 


1420 


PRINTTAB (5) ; "4. SET TO n/72 


INCH" 


1430 


PRINTTAB (5) ; "5. SET TO n/14 


4 INCH" 


1440 


PRINTTAB (5) ; "6. SET TO n/21 


6 INCH" 


1450 


PRINTTAB (5) ; "7. NEVERMIND" 


1460 


PRINT 


1470 


PRINTTAB(5) ; "SELECTION— >" ; 


1480 


I$=INKEY$:IFI$=""THEN1480 E 


LSE IF VAL(I$)<1 OR VAL(I$)>8 TH 


EN 1480 ELSE PRINT 1$ 


1490 


IF VAL(I$)=7 THEN RETURN 


1500 


ON VAL(I$) GOTO 1510,1520,1 


530,. 


L540, 1580, 1620 


1510 


PRINT#-2,CHR$(27) ;CHR$(48) ; 


: RETURN 


1520 


PRINT#-2,CHR$(27) ;CHR$(49) ; 


: RETURN 


1530 


PRINT#-2,CHR$(27) ;CHR$(50) ; 


: RETURN 


1540 


CLS 


1550 


INPUT "HOW MANY 72ths OF AN 


INCH' 


1 ;SP 


1560 


IF SP<0 OR SP>255 THEN PRIN 


T" INPUT ERROR": PRINT: GOTO 15 50 


1570 


PRINT#-2,CHR$(27) ;CHR$(65) ; 


CHR$(SP) ;: RETURN 


1580 


CLS 


1590 


INPUT"HOW MANY 144ths OF AN 


INCH";SP 


1600 


IF SP<0 OR SP>255 THEN PRIN 


T" INPUT ERROR" : PRINT : GOTO 1590 


1610 


PRINT#-2,CHR$(27) ;CHR$(51) ; 


CHR$(SP) ;: RETURN 


1620 


CLS 


1630 


INPUT"HOW MANY 216ths OF AN 


INCH";SP 


1640 


IF SP<0 OR SP>255 THEN PRIN 


T"INPUT ERROR": PRINT: GOTO 16 30 


1650 


PRINT#-2,CHR$(27) ?CHR$(51) ; 


CHR$(SP) ;: RETURN 


1660 


PRINT#-2,CHR$(27) ;CHR$(64) ; 


: RETURN 


1670 


CLS : END ^ 



V® 



Keep track with 

Baseball Statpak 




Finally, Big League Stats for your Color Computer! 
Baseball Statpak will make you a winner with your play- 
ers. Keep track of up to 180 batters and 60 pitchers on 
12 teams. Perfect for Little League, high school, ama- 
teur softball. 

Baseball Statpak contains three separate programs 
t^, track at bats, runs, hits, errors, walks, home runs, 
RBI's, on-base-percentage, innings pitched, earned 
runs, strikeouts and lots more. Also keeps track of 
team standings for league statistics. Store your data on 
tape or disk. 

Lightning-fast machine language sort will order your 
data by any stat for startling screen displays and beauti- 
ful printed reports! 

You've seen these stats in the newspapers. Now 
you can have them for your team! Baseball Statpak re- 
quires 16K Extended Basic for tape version, 32K for 
disk. CoCo 3 compatible. Only $34.95 on tape or disk. 



The Handicapper 



Use your Color Computer to improve your perfor- 
mance at the track! Separate handicappers for Thor- 
oughbreds, Harness Horses and Greyhounds let you 
rank the horses or dogs in each race quickly and easily, 
even if you've never handicapped before! 

All the information you need is readily available in 
the Thoroughbred Racing Form, harness or dog track 
program. Data entry is quick and easy. We even provide 
a diagram showing you where to find the data! 

Written by a veteran handicapper, our programs use 
sound, established techniques and the power of your 
computer to cut handicapping time from hours to min- 
utes. Ratings are displayed on screen or sent to your 
printer. Our instructions and wagering guide tell you 
which races to bet and which to avoid — a real secret of 
good handicapping. 

The handicappers require 16K for tape versions, 
32K for disk. They're all CoCo 3 compatible, too! Thor- 
oughbred, Harness or Greyhound Handicappers, 
$39.95 each on tape or disk. Any two for $59.95, all 
three only $79.95. 

Federal Hill Software 

8134 Scotts Level Road 

Baltimore, Md. 21208 



Toll free orders 800-628-2828 Ext 850 
Information 30 1 -52 1 -4886 
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EDUCATION NOTES 



Learning About Scales 
Key To Understanding Maps 



By Steve Blyn 
Rainbow Contributing Editor 



Map skills are taught through- 
out the elementary and mid- 
dle school years. They often 
are begun by using familiar regions such 
as the child's classroom or living room. 
The child sees that these rooms are areas 
obviously too large to replicate on 
paper. Maps become the way the child 
can draw these rooms on paper — later 
on he can draw other places and distan- 
ces. Once the child grasps the concept 
of the need for maps, other skills, such 
as measurement, estimation and scal- 
ing, can be taught when deemed ap- 
propriate. 

This month's program presents an 
introduction to reading scale drawings 
on a map. Children often learn to render 
scale drawings to represent distances 
from their home to school, to the library 
or to any other point of interest. If these 
distances are not known, the teacher 
often suggests appropriate distances. 
The pupils usually indicate their scales 
on the bottom of these drawings. 



Steve Blyn teaches both exceptional 
and gifted children, holds two master's 
degrees and has won awards for the 
design of programs to aid the handi- 
capped. He owns Computer Island and 
lives in Staten Island. New York. 



Next, the pupils learn to construct an 
ascending table of values based on the 
various scales. For example, if one inch 
represents two miles, the table might 
look like this: 

SCALE 1 INCH = 2 MILES 

Inches: 1 in. 2 in. 3 in. 4 in. 5 in. 
Miles: 2 mi. 4 mi. 6 mi. 8 mi. 10 mi. 



Our program can be approached in a 
similar manner, using two colored lines. 
The shorter, blue line represents the 
scale. A chart such as the one shown 
here can be drawn for each different 
scale. It is drawn in Line 80. 

The longer, red line represents the 
line whose length is to be determined by 
the user. This could be the distance to 
school or to grandmother's house or 
any other example you or the children 
can think of. This line is randomly 
chosen in Line 70 and drawn in Line 
140. 

Three values are presented to the 
student. One of the values is the approx- 
imate correct answer. The other two are 
too far out of line to be possibilities. The 
values are chosen and printed on lines 



180 to 240 in random order. We had to 
be careful to scramble the order of the 
three possible answers. For example, we 
wouldn't want the correct answer to 
always appear in the middle, or always 
be the largest or smallest value. The 
correct answer is always retained by the 
computer, as variable Y. 

Lines 260 to 270 accept the student's 
answer and convert it to a numeric 
value. Lines 280 to 290 inform the 
student whether he was correct or 
incorrect, and what the real answer 
should be. The counter is on Line 60. 
After 10 tries, the score is displayed and 
the user chooses to end the program or 
play again. 

There are two methods the child may 
use to determine the correct answer — 
actual measurement on the screen with 
a ruler or estimation. Both are accept- 
able means of arriving at the correct 
answer, and both should be encour- 
aged. The best of both worlds would be, 
first estimate and then measure, to 
check out the answers. We, at Computer 
Island, hope that your child/students 
enjoy and learn from this program. □ 




The listing: MAPSCRLE 

10 REM"SCALE DRAWINGS" 

20 REM" STEVE BLYN , COMPUTER ISLAN 

D,STATEN ISLAND, NY ,1987 


30 

40 

50 

60 
tt • 


CLS0:PRINT@3,"SCALE DRAWINGS" 

N=N+1:PRINT@2 6, "#=" ;N; 

PRINT@90,"C=";CR; 

IF N=ll THEN PRINT@2 6, "TOTALS 

PRINT§154 , CR*10 ; "%" ; : PRINT@48 
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2, "PRESS G TO GO ON OR E TO END" 


230 IF R=2 THEN PRINT§320 , Yl ; : PR 


;:GOTO 3 30 


INT§330,Y2; :PRINT@340,Y; 


70 B=7+RND(55) 


240 IF R=3 THEN PRINT@320, Y2 ; : PR 


80 FOR T=0 TO 7 : SET (T , 7 , 7 ) :NEXT 


INT@330 , Y ; : PRINT@340 , Yl ; 


T 


250 PRINT§326, "OR"; : PRINT@336 , "0 


90 X1=RND(5) :X2=RND(5) 


R";:PRINT@346,R$; 


100 X=X1*X2*10 


2 60 PRINT@3 84,"";:LINE INPUT EN$ 


110 R=RND(3):IF R=l THEN R$="FEE 


270 PRINT@3 94,"";:EN=VAL(EN$) 


T" ELSE IF R=2 THEN R$="MILES" E 


280 IF EN=Y THEN PRINT" CORRECT" : 


LSE R$="IN." 


CR=CR+1 : PLAY"L50CDECDEGGEDC" 


120 PRINT@104,"="; 


290 IF ENOY THEN PRINT"THE ANSW 


130 PRINT@108,X;R$; 


ER IS"Y:PLAY"L50CCC" 


140 FOR T=0 TO B: SET (T, 13 , 8) :NEX 


300 PRINT@453, "PRESS ENTER TO GO 


T T 


ON" ; 


150 PRINT@256,"THE RED LINE IS A 


310 Q$=INKEY$ 


BOUT HOW LONG?" 


320 IF Q$=CHR$(13) THEN 30 ELSE 


160 AN=B/8:AN=INT(AN+.5) 


310 


170 REM" THE VARIABLE Y IS THE CO 


330 PLAY"GGGEEECCCEGEC" 


RRECT ANSWER" 


340 Q$=INKEY$ 


180 Y=X*AN 


350 IF Q$="G" THEN RUN ELSE IF Q 


190 U=RND(2):IF U=l THEN Y1=Y*2 


$="E" THEN 360 ELSE 340 


ELSE Yl=Y/4 


3 60 CLS:END 


200 V=RND(2):IF V=l THEN Y2=Y/2 




ELSE Y2=Y*4 


■j 


210 R=RND(3) : PRINT© 3 20," " 


^^^^^^^^^^^^^^^^^^^^^^^^\ 


220 IF R=l THEN PRINT@3 20 , Y ; : PRI 




NT@3 30,Y1; :PRINT@340,Y2; 


/Z\ 1 




CoCo Cat 
Sat/L. 

NOT 



Get your own CoCo Cat button by 
writing to Falsoft, Inc., The Falsoft 
Building, P.O. Box 385, Prospect, KY 
40059. Please enclose $1 .50 for ship- 
ping and handling. 
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PARAMISSION: 

fast and dangerous! 



By Michel Galibois 

You are the only human who can 
save the world, but you are 
forced to jump from a cargo 
plane. While falling at great 
speed, you see a missile coming 
straight at you; the ground seems bigger 
and bigger. Just in time, you open the 
parachute and float slowly. You look 
down and see the big missile hitting a 
mountain. 

When you think everything has 
calmed down, and you are about to land 
on a big tree, you see another missile 

Michel Galibois is 1 7 years old and lives 
in Laval. Quebec. He is studying in 
Canada and has owned a Color Com- 
puter/or almost four years. 



coming at you. It lakes quick action to 
avoid both. But you are able to land 
safely on a platform. Now you can 
easily save the world! 

Paramission is a BASIC program but 
is written a special way, so it runs very 
fast. It requires 32K, Extended BASIC 
and a joystick. 

This game is original, different from 
shoot-'em-ups. The objective of this 
game is to land a parachutist on one of 
five platforms. You can land on the 
easiest one, but you receive fewer 
points. 

You have to jump from a big cargo 
plane; this is accomplished by pressing 
the firebutton. Press the button again 
and the parachute will open. Get your- 
self positioned to land on a platform by 
using the joystick. Move the joystick up 



to descend slowly, and down to land 
faster. 

You must successfully land on all five 
platforms to change screens, but beware 
of the missile that is always trying to kill 
you. Take care not to land on the deadly 
tree or in the shark-infested waters, and 
avoid crashing into the building or on 
the steep hills. 

The second screen is completely 
different; it's even more difficult. The 
missile reacts faster and is harder to 
avoid. Watch out, if the missile blows up 
near you, the explosion could kill you. 

In Paramission you have three lives. 
Play levels range from easy to hard, and 
the graphics are high resolution. 

If your computer can't take the speed- 
up poke (POKE G5495,0) you need to 
delete it in lines 20, 1 130 and 1340. D 



r 120 . . 


...162 


870 ... 


...172 -. 


220 .. 


...157 


1040 . . 


...68 


290 .. 


...219 


1190 .. 


...246 


370 .. 


...58 


1340 . . 


....58 


480 .. 


...232 


1410 .. 


...136 


560 .. 


...17 


1580 . . 


....85 


730 .. 


...42 


END .. 


...134 





The listing: PflRflM 1 55 

10 CLS:PRINT@2 35, M GET READY" 

20 POKE65495,0:PMODE4, 1:PCLS:E1= 

130 : Bl=13 : BB=3 : 1=3 : FF=130 : GG=13 

30 DIM AA(15) ,BB(24) ,CC(39) ,DD(1 

0),EE(2),FF(2),GG(13),HH(10),II( 

25) ,JJ(25) ,KK(10) ,LL(25) ,B$(25) , 

MM(56) ,NN(56) ,00(77) ,PP(77) ,QQ(7 

7) 

40 CIRCLE (10,10) ,5: PAINT( 10,10 ) # 

1:COLOR0:FORA=1TO20STEP 2: LINE (A 

, ) - ( A , 20 ) , PSET : NEXT : COLOR1 : GET ( 

5,5)-(15,15) ,HH,G 

5J3 FORA=1TO50:B=RND(25) :C=RND(25 

) : PSET ( 50+B , 50+C , 1 ) : NEXT : GET ( 50 , 

50)-(75,75) ,II,G:PCLS 



60 DRAW"BM100, 100M98, 103M100, 100 

M105,103M101,100U3F3H3G3E3E1U1L2 

D1F1D3" 

70 DRAW"BM200,100A2M198,97M200,1 

00M205,97M201,100U3F3H3G3E4U1L2D 

1F1D3A0" 

80 GET(198,105)-(205,92) ,GG,G 

90 GET(94,103)-(109,90) ,AA,G 

100 DRAW M BM150,10U6R4D2BD2L2R2D2 

L4BR6U6R4D3L4R4D3BR2U6F2E2D6BR2U 

6R4L4D3R3L3D3R4BR6U6R4D6L4BR8H2U 

4D4F2E2U4BD6BR2R4L4U3R3L3U3R4BD6 

BR2U6R4D3L4R1F3" : GET ( 148 , 10) - (20 

4,2) ,MM,G 

110 GET(174,10)-(202,2) ,NN,G:PUT 

( 17 8 , 10 ) - ( 20 6 , 2 ) , NN , PSET : GET ( 150 

,10)-(206,2),NN,G 

120 DRAW"BM92,91E5R8F5G6E3H3L6G3 

F3H6E4C0":PAINT(96,90) ,1 

130 FOR A=92 

A,93)-(A,80) 

140 COLOR 1: GET (50 ,50) -(54, 60) , 

D,G: GET (93, 103) -(109, 83) ,BB,G 

150 DRAW"BM100,150S6L1R16E5R1U1L 

1U3L4D1G3L11M96 , 147D1F1R1" : PAINT 

(105,148) ,1 



TO 110 STEP 
, PSET: NEXT 



2 : LINE ( 



D 



May 1987 THE RAINBOW 115 



160 COLOR0:LINE(103,144)-(103,14 

5) ,PSET: LINE (105, 144) -(105, 145) , 

PSET 

170 DRAW"BM110,145C0S4R6L4D3L2H1 

U1BD4U1R4U1L2BR8F1E1U2H1G1D2R1U3 

180 FOR A=124 TO 130 STEP 2: PSET 

(A, 143,0) :NEXT 

190 COLORl:GET(96,151)-(135,137) 

,CC,G 

200 GET(149,99)-(151,101) ,FF,G 

210 DRAW"BM170,100E3G3L1H3F3U1BU 

2U1R2D1L2R2BD2D2F3H3L1G3E3U1" :GE 

T (166, 95) -(174,105) ,KK,G 

220 DRAW"BM10,10C5U6R4D3L4BR8BD2 

U6R4D3L4R4D3U1BR4U6R4D3L4R1F3BR4 

BD1U6R4D3L4R4D3BR4BD1U6F2E2D6BR4 

BU1U6D6BR4BU1R4U3L4U3R4BD7BR4R4U 

3L4U3R4BD7BR4U6D6BR4BU1U6R4D6L4B 

R8BU1U6D1F4D1U6" : GET ( 10 , 12 ) - (98 , 

2) , 00, G: PUT (11, 12) -(99, 2) ,00, OR: 

GET(10,12)-(99,2) ,00,G 

230 DRAW"BM10,30U6R4D3L4R4BD4BR4 

U6R4D3L4R4D3U1BR4U6R4D3L4R1F3BU1 

BR4U6R4D3L4R4D3BR4BD1U6F2E2D6BR4 

BD1U6D6BR4BU1R4U3L4U3R4BD5BR4R4U 

3L4U3R4BD7BR4U6D6BR4BD1U6R4D6L4B 

R8BU1U6D1F4D1U6" : GET ( 10 , 3 2 ) - ( 98 , 

22) ,PP,G:PUT(ll,32)-(99,22) ,PP,0 

R: GET (10, 32) -(99 ,22) ,PP,G 

240 DRAW"BM10,50U6R4D3L4BR8BD4U6 

R4D3L4R4D3BR4BD1U6R4D3L4R1F3BR4B 

U1U6R4D3L4R4D3BR4BU1U6F2E2D6BD1B 

R4U6D6BR4BD1R4U3L4U3R4BD5BR4R4U3 

L4U3R4BD5BR4U6D6BR4BD1U6R4D6L4BR 

8BD1U6D1F4D1U6" : GET ( 10 , 52 ) - (98 , 4 

2) ,QQ,G:PUT(ll,52)-(99,42) ,QQ,OR 

:GET(10,52)-(99,42) ,QQ,G 

250 ■ 

2 60 ' SCREENS 

270 COLORltIF R=0 THEN 370 ELSEP 

CLS : A=215 : WW=0 : El=130 : Bl=13 : BB=3 

: Dl=3 : D=0 : BB=0 : EE=0 : LINE ( 6 , ) - ( 2 

52,187) , PSET, B: PAINT (2, 2) , 1 : COLO 



R0 : LINE (7 ,0) -(251,0), PSET: C0L0R1 

280 FORXX=47T067 STEP2 : LINE (XX, 1 

50) -(XX, 168) , PSET: NEXT :FORXX=95T 

O108STEP2 : LINE (XX, 126) - (XX, 147 ) , 

PSET: LINE (XX, 158) -(XX, 167) ,PSET: 

NEXT: FORXX=241T0247STEP2: LINE (XX 

,110) -(XX, 145) ,PSET:NEXT 

290 DRAW"BM55,160E2U2E4R2E2F2D1G 

4D1G3L1G5L2G2L3H2U2E3R2E4R3BR45B 

U10E3U7H2U5H2L2H2G2D3F2D7F2D3F2B 

D15D4F2R1E3U4H3L1G3BM240,145U2E1 

U15E2U5E1U7E1F2D5G1D17G1D5G3H3 

300 DRAW"BM4,155F3R2F3D2F2R15E2U 

2E2R4F2E4U5E2R2U2E3R18E5U2H2U2H2 

U2H1U3E3U2E2U3E5F2R1E2F5R5F2R5F6 

R2F2R2F3D5G2D3F2D3F2D2F2D13G3L2G 

1D10F2R20E3R5E2F3R15E5U5E5R5E2E2 

R25U20E5R5E5L15D30F3D5F7R10E8U2 5 

E2U15E4U10E5U20E2R2E2 

310 PAINT(10,180) ,1 

320 FORXX=116T0156STEP2: LINE (183 

, XX) - ( 207 , XX) , PSET : NEXT : F0RXX=18 

3TO207STEP6:LINE(XX,116)-(XX,156 

) , PSET: NEXT 

330 PAINT (2 10, 130) ,1 

340 LINE(92, 117)-(115, 105) , PSET: 

LINE (9 6, 119) -(119, 105) , PSET: CIRC 

LE(121,98) ,17, , .50: PAINT (111, 108 

) ,1: PAINT (12 1,98) , 1 : COLOR0 : FORXX 

=103TO138 STEP 2 : LINE (XX, 90) - (XX 

,106) , PSET: NEXT 

350 COLOR1:FORXX=210TO2 3 4STEP2:L 

INE(XX,162) -(XX, 172) ,PSET:NEXT 

3 60 GOTO 490 

370 PCLS:A=215:WW=0:E1=130:B1=13 

: BB=3 : Dl=3 : D=0 : BB=0 : EE=0 

380 DRAW"BM58,175C1R40G9L2 6H2U3H 

1U2H1" :PAINT(61,177) ,1 

390 DRAWBM131, 175R59G10L40H10" : 

PAINT(134,176) ,1 

400 FOR XX=53 TO 200 STEP 2 : COLO 

R 0:LINE(XX,170)-(XX,188) ,PSET:N 

EXT: COLOR 1 







^A-<f^"<Fj 
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U.S. check or money 

order. RI residents 

please add 6% sales tax. 



TEPCO 

30 Water Street 
Portsmouth, RI 02871 
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410 LINE(5, 0)-(252, 187) , PSET, B:P 

AINT ( 2 , 2 ) , 1 : COLOR0 : LINE ( 7 , ) - ( 2 5 

1,0), PSET : C0L0R1 : LINE ( 6 , ) - ( 6 , 10 

0) ,PSET 

420 DRAW"BM4,68R2F4D3F3D3G4R15G4 

D3G4D4G4D2G3F5D2R15D1G5D6F4D3F2D 

3F2D4G3L4G2D6R2F3E2F5R3F6D4R15D4 

F2D4F2R25E7R15E3R20D2F8R40E10F2R 

4E1R2E1R3E1U3E3R45U40L12U15L12D5 

5" 

430 DRAW"BM8,140R3F3D4F2D4F3D2G3 

L4H3U5H3U5E6BU10BR12H4L3H3L4G3D2 

F3R5E4U3BD55BR10R8F2R5F3D1G3L7H2 

L5H4E3 

440 PAINT (2 50 ,150) , 1 : PAINT (7 , 100 

)/l 

450 FOR XX=5 TO 22 STEP 2: LINE (X 
X, 117) -(XX, 190) , PSET: NEXT 
4 60 FOR XX=25 TO 4 9 STEP 2 : LINE ( 
XX, 177) -(XX, 190) ,PSET:NEXT 
470 FOR XX=117 TO 168 STEP 2 : COL 
OR 0:LINE(230,XX)-(251,XX) ,PSET: 
NEXT:COLOR 1: LINE (247 , 130) - (247 , 
168) , PSET: LINE (241, 115) -(241, 168 
) ,PSET:LINE(235,115)-(235,168) ,P 
SET 

480 DRAW"BM122,175M127,150R7M132 
, 175 " : PAINT (12 6, 170) , 1 : CIRCLE (13 
0,140) ,22, , .65: PAINT (130, 140) ,1: 
COLOR 0::FOR WW=101 TO 160 STEP 
2: LINE (WW, 110) -(WW, 154) ,PSET:NEX 
T:WW=0 
490 ' 

500 WW=WW+l:COLORl:IF R=0THEN ON 
WW GOSUB 980,990,1000,1010,1020 
ELSE ON WW GOSUB 1030,1040,1050 
,1060,1070 

510 FOR CD=CE TO CE+15 STEP 2 : LI 
NE(CD,CF)-(CD,CF+3) ,PSET:NEXT CD 
520 IF WWO5THEN500 ELSE GOSUB14 
90 

530 ' 
540 ' PRESENTATION 



550 SCREEN1,1:IF M=1THEN620ELSEF 

0RXX=1T014 : PLAY"V-L25501D" : PUT (9 

0,50) -(179, 60) ,00,PSET:PLAY"D":P 

UT ( 90 , 4 9 ) - ( 17 9 , 59 ) , PP , PSET : PLAY " 

D" : PUT ( 90 , 4 8 ) - ( 1 7 9 , 5 8 ) , QQ , PSET : P 

LAY"D" : PUT (90 , 49) - (179 , 59 ) , PP, PS 

ET : NEXT 

560 PLAY"V15":F0RXX=1T014:PLAY"V 

-L2 55O3AD":NEXT:DRAW"BM100,70U6D 

6R4BR2U6R4L4D3R3L3D3R4BR4H2U4D4F 

2E2U4BR2R4L4D3R3L3D3R4BR2U6D6R4B 

R4H2U2E2BR4D6L2R4L2U6G1E1D3BR4R4 

BR2BD3R4U3L3R3U3L4BR6F2D2G2" 

570 PLAY"V15":A$=INKEY$:IF A$<>" 

"THENF0RXX=1T014 : PLAY"V-AD" : NEXT 

580 IF A$="l M THENO=.3ELSEIFA$="2 

"THENO= . 5ELSEIFA$=" 3 "THENO= . 8ELS 

EGOTO 570 

590 COLOR0:LINE(90,49)-(179,70) , 

PSET,BF:M=1 

600 GOTO 630 

610 ■ 

620 ' PLANE 

630 A=A-3:PUT(A,10)-(A+39,24) ,CC 

,PSET 

640 PLAY"V1501L255G" 

650 IF A<7 THEN COLOR0 : LINE (A, 10 

)-(A+39,24) ,PSET,BF:D=0:A=215 

660 P=PEEK(65280) : IF P=126 OR P= 

2 54 THEN E=A+ 15 : B=20 : COLOR : LIN 

E(A,10)-(A+39,24) , PSET, BF: GOTO 7 

00 

670 GOTO 630 

680 ' 

690 'MEN 

700 A=JOYSTK(0) : B=B+5 : PUT (E, B) - ( 

E+15,B+13) ,AA,PSET:IF A<10 THEN 

D=D-.4 ELSE IF A>53 THEN D=D+ . 4 

710 E=E+D:IF D<-3.6 THEN D=-3 . 6 

ELSE IF D>3.6 THEN D=3 . 6 

720 IF PPOINT(E+5,B+19)=5 OR PPO 

INT (E+10 , B+19 ) =5THEN1200 

730 P=PEEK(65280) : IF P=126 OR P= 



BUDGET FORECASTER 

PROJECT HOW MUCH YOU WILL HAVE AND WHEN 
YOU WILL HAVE IT BASED ON YOUR "WHAT IP BUDGET 
STRATEGIES. INPUT YOUR CONSTANT AND VARIABLE BI- 
WEEKLY, FIRST OF THE MONTH, END OF THE MONTH, 
SEMI-MONTHLY, AND BI-WEEKLY EXPENSES, INCOMES, 
AND INVESTMENTS (INCLUDING RATE OF RETURN). 
ENTER YOUR STARTING CASH BALANCE AND INVEST- 
MENT BALANCES. SEE YOUR RESULTS IN INCREMENTS 
OF TWO WEEKS UP TO THE CALENDAR LIMIT OF 
12/31/9999! 

64K TAPE VERSION $34,95 



GAME SIMULATORS 

COMPUTE YOUR CHANCES OF WINNING BASED ON 
PLAYING AND BETTING STRATEGIES. SIMULATE UP TO 
10,000 GAMES! 64K TAPE VERSIONS. 

"CRAPS" $22.95 

"BLACKJACK" $19.95 

"5 CARD DRAW" $19.95 



SEND CHECK OR M.O + $1.50 EACH S/H TO: 

PROBITAS. 2213 VENETION DRIVE 
STOCKTON, CA 95207 

CALIFORNIA RESIDENTS ADD 6% SALES TAX 
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254 THEN 780 

740 GOSUB 870 

750 GOTO700 

760 ' 

770 ' PARACHUTE 

780 IF D>=0.1 THEN PUT (E-8 , B+4) - 

(E-4,B+14) ,DD,PSET ELSE IF D<=-. 

1 THEN PUT(E+12,B+4)-(E+16,B+14) 

,DD,PSET 

790 A=JOYSTK(0) :AB=JOYSTK(l) :IF 

ABO 2 THENB=B+1 ELSEB=B+3 

800 IF PPOINT(E+7,B+20)=5 OR PPO 

INT(E+8,B+20)=5 THEN 1280 ELSE I 

F PPOINT(E-5,B+14)=5 OR PPOINT(E 

+13 , B+14 ) =5THEN1200 

810 PUT(E-4,B)-(E+12,B+20) ; BB,PS 

ETtIF A<10 THEN D=D-.4 ELSE IF A 

>53 THEN D=D+.4 

820 E=E+D:IF D<-3.6 THEN D=-3 . 6 

ELSE IF D>3.6 THEN D=3 . 6 

830 GOSUB 870 

840 GOTO 780 

850 ' 

860 ' MISSILE 

870 IF E+8<E1 THEN EE=EE-0 ELSE 

IF E+8>E1 THEN EE=EE+0 

880 IF B<B1 THEN BB=BB-0 ELSE IF 

B>B1 THEN BB=BB+0 
890 HH=FF : II=GG : FF=E1 : GG=B1 : E1=E 
1+EE:B1=B1+BB 

900 IF BB<-6 THEN BB=-6 ELSE IF 
BB>7 THEN BB=7 

910 IF EE<-6 THEN EE=-6 ELSE IF 
EE>6 THEN EE=6 

920 COLOR0:LINE(HH,II)-(FF,GG) ,P 
SET 

930 IFPP0INT(E1,B1)=5 ORPPOINT(E 
l+2,Bl+2)=5 ORPPOINT(El+2,Bl-2)= 
5 ORPPOINT(El-2,Bl+2)=5 ORPPOINT 
(El-2,Bl-2)=5 THENGOSUB1090 
940 COLORl:LINE(FF,GG)-(El,Bl) ,P 
SET 

950 RETURN 
960 • 

970 ' SCREENS 

980 CE=13:CF=81:IF Gl=l THEN COL 
OR0: RETURN ELSE RETURN 
990 CE=19:CF=112:IF G2=lTHENCOLO 
R0 : RETURN : ELSERETURN 
1000 CE=45:CF=169:IF G3=1THENC0L 
OR0:RETURMELSE RETURN 
1010 CE=97:CF=174:IF G4=1THENC0L 
OR0: RETURN ELSE RETURN 
1020 CE=211:CF=164:IF G5=l THENC 
OLOR0 : RETURNELSERETURN 
1030 CE=15:CF=161:IF I1=1THEN CO 
LOR0 : RETURN ELSERETURN 



1040 CE=51:CF=141:IFI2=1THENC0L0 

R0 : RETURNELSERETURN 

1050 CE=121:CF=175:IFI3=1THENC0L 

OR0 : RETURNELSERETURN 

1060 CE=149:CF=173:IFI4=1THENC0L 

OR0 : RETURNELSERETURN 

1070 CE=209:CF=124:IFI5=1THENCOL 

OR0 : RETURNELSERETURN 

1080 • 

1090 ■ EXPLOSION 

1100 IFEK12THENE1=12 

1110 IF BK12THENB1=12 

1120 GET(E1-12,B1-12)-(E1+13,B1+ 

13) ,LL,G:PUT(El-5,Bl-5)-(El+5,Bl 

+5) ,HH,OR:PLAY"01L255AAA" 

1130 PUT(E1-12,B1-12)-(E1+13,B1+ 

13 ) , II , OR: POKE65494 , : PLAY"V1" : F 

0RG=lTO14 : PLAY"V+V+ ; D" : NEXT : POKE 

65495, 0: PUT (E1-12,B1-12)-(E1+13, 

Bl+13) ,LL,PSET 

1140 IFE=130 ANDB=25 THEN1410 

1150 IF E+13>E1-12 AND E<E1+13 A 

ND B+15>B1-12 AND B<B1+13 THEN 1 

200 

1160 E1=130:B1=13:BB=0:EE=0:FF=1 

30:GG=13 

1170 RETURN 

1180 ■ 

1190 ' DEAD 

1200 E=E-D : COLOR0 : LINE (E-4 , B+3 ) - 

(E+12,B+20) ,PSET,BF:COLORl 

1210 B=B+2:PUT(E,B)-(E+7,B+13) ,G 

G,PSET 

1220 IF PPOINT(E+2,B+14)=5 OR PP 

OINT(E+5,B+14)=5 THEN PLAY"V15L2 

00AAA" : LINE (E-4, B+8)- (E-8, B+5) ,P 

SET : LINE- (E-8 , B+7 ) , PSET : LINE- (E- 

12 , B+6) , PSET: LINE (E+9 , B+8 ) - (E+13 

,B+5) , PSET: LINE- (E+13, B+7) ,PSET: 

LINE- (E+17, B+6) ,PSET:GOTO 1330 

12 30 GOTO 1210 

1240 ' 

1250 I LANDING 

12 60 CE=13:CF=81:GOTO 510 

1270 CE=19:CF=112:GOTO 510 

1280 Q=INT(E/2) :Q=Q*2 

1290 IF PPOINT(Q+7,B+20)=5 AND P 

POINT(Q+8,B+20)=5 THEN 13 30 

1300 IF PPOINT(Q+7,B+20)=0 AND P 

POINT(Q+8,B+20)=5 THEN 1330 ELSE 

GOTO 1380 
1310 ' 

1320 ' INCOMPLETED MISSION 
1330 DRAW"BM75 , 20C1R4L2U6L2R4BR2 
D6U5F4D1U6BR2R4L4D6R4BR2U6R4D6L4 
BR6U6F2E2D6BR2U6R4D3L4D3BR6U6D6R 
4BR2U6R4L4D3R3L3D3R4BR4U6L2R4BR2 
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R4L4D3R3L3D3R4BR2U6R2F2D2G2L2BR1 

0U6F2E2D6BR3U6D6BR3R4U3L4U3R4BD6 

BR3R4U3L4U3R4BR3D6BR3R4U6L4D6BR7 

U6D1F4D1U6" 

1340 POKE65494,0:FORXX=1TO500:NE 

XT:PLAY"V15O1L6AFAADL20":FORK=1T 

014 : PLAY"V-G" : NEXT : 1=1-1 : POKE654 

95,0 

1350 IF I=0THENCOLOR0:LINE(75,20 

) -(184, 12) ,PSET,BF:GOTO1670 ELSE 

FORXX=1TO3000 : NEXT : SCREEN0 , : GO 

TO270 

1360 ' 

1370 • ACCOMPLISHED MISSION 

1380 DRAW"BM75,20C1U6R4D3L4R4D3B 

R2R4L4U6R4BR2R4L4D6R4BR2U6R4D6L4 

BR6U6F2E2D6BR2U6R4D3L4BU3BR6D6R4 

BR2U6BR2R4L4D3R4D3L4BR6U6D3R4U3D 

6BR2R4L4U3R3L3U3R4BR2R2F2D2G2L2U 

6D6BR12U6F2E2D6BR2U6BR2R4L4D3R4D 

3L4BR6R4U3L4U3R4BR2D6BR2U6R4D6L4 

BR6U6D1F4D1U6" 

1390 IFR=0THENIF E<28 ANDB<65 TH 

EN G1=1:F=100 ELSE IFE<32 THEN G 

2=1:F=200ELSE IF E<60 THEN G3=l: 

F=300 ELSE IF E<112 THEN G4=1:F= 

400 ELSE G5=l:F=300 

1400 IFR=1THENIFE<30 THENI1=1:F= 

300ELSEIFE<66THENI2=1 : F=300ELSEI 

FE<136THENF=400:I3=1ELSEIFE<164T 

HENI4=1 : F=400ELSEI5=1 : F=300 

1410 E=E-D:B=B-2:COLOR0:LINE(E-4 

,B+2)-(E+12,B+12) ,PSET,BF 

1420 F0RH2=1T07:F0RH1=1T05STEP.5 

: PUT (E, B+12-H1) - (E+8 , B+22-H1) , KK 

, PSET : NEXTH1 : F0RH1=5T01STEP- . 5 : P 

UT(E,B+12-Hl)-(E+8,B+22-Hl) ,KK,P 

SET : NEXTH1 : PLAY"O3L200V15AAA" : NE 

XTH2 

1430 O=O+.03:H3=H3+1:IF R=0THENI 

F H3=5THENH3=0:G1=0:G2=0:G3=0:G4 

=0 : G5=0 : R=l 

1440 IF R=1THEN IF H3=5THENH3=0 : 

11=0 : 12=0 : 13=0 : 14=0 : 15=0 : R=0 

1450 FORXX=1TO800:NEXT:SCREEN0,0 

1460 GOTO 2 70 

1470 ' 

1480 ' SCORE 

1490 J=J+F:F=0 

1500 A$=STR$(J) :DRAW"BM209,7C5" 

1510 FOR H=l TO LEN(A$) 

1520 B$(16)="BUU4ER2FD4GL2HBR4BD 
it 

1530 B$(17)="BRBU5ED6LR2BR" 
1540 B$(18)="BU5ER2FDG4R4" 
1550 B$(19)="BU5ER2FDGLRFDGL2HBR 
4BD" 



1560 

1570 

1580 

D6" 

1590 

1600 



B$ ( 20 ) ="BR3U6G3R4BD3 " 

B$ (21) ="BUFR2EUHL3U3R4BD6" 

B$(22)="BU3R3FDGL2HU3E2RBRB 



B$(23)="BU6R4G3D3BR3" 
B$(24)="BR4BU2DGL2HUER2L2HU 

ER2FDGFBD2" 

1610 B$(25)="BUFR2EU4HL2GDFR2BRB 

D3" 

1620 DRAW+B$(ASC(MID$(A$,H,1) ) -3 

2)+"BR4":NEXT:H=0 

1630 IF I>1 THENFOR XX=1 TO 1-1: 

H=H+10:PUT(H,0)-(H+8,10) ,KK,PSET 

: NEXT: RETURN 

1640 RETURN 

1650 ' 

1660 ' GAME OVER 

1670 FORXX=1TO40 STEP. 5: IF XX/2= 

INT(XX/2)0R (XX-.5)/2=INT((XX-.5 

)/2) THENPUT ( 108 , XX*2 ) - ( 164 , XX*2+ 

8),MM,PSET ELSE PUT (108 , XX*2) - (1 

64,XX*2+8) ,NN,PSET 

1680 NEXT:PLAY"02L18 6V15BAGFEDC" 

1690 P=PEEK(65280) :IFP=1260R P=2 

54 THEN RUN 

1700 GOTO 1690 



Jtm 




A unique approach 
to disc reliability 

Memory Minder from J&M Systems is 
one of the most comprehensive disk 
drive diagnostic programs available for 
microcomputers. It quickly and easily 
runs comprehensive testing of all vital 
operating parameters to assure data 
integrity. 

Data Integrity 

Means Data Confidence 

Memory Minder is so easy io run you 
will be inclined to test your disk drives on 
a regular basis and correct problems be- 
fore they ever endanger your data. This 
program provides long term confidence 
in your data integrity. 

Memory Minder is currently available 
for the following: 
Version 1.03 
I If- mi Model III; 
48 tpi Single Side 
48 tpi Double Side 
96 tpi and 48 tpi Double Side 
TRS-80 Model-I 
48 tpi Single Side Single Density 
TRS-80 Color Computer and 
TDP-100 
48 tpi Single Side 
48 tpi Double Side 




Technical Knowledge 
Not Required 

Simply slip in the Memory Minder disk 
and select one or more of eight sophisti- 
cated tests. Easy to understand graphics 
on your screen display findings in a few 
moments. Now you can discover poten- 
tial misalignments and problems before 
they endanger your valuable data. 

Call or write for details and 
more information 

<//A 

J&M SYSTEMS, LTD. 

15100-A CENTRAL SOUTHEAST 

ALBUQUERQUE, NM 87123 

505/292-4182 

We accept MasterCard and Visa 
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DELPHI BUREAU 



Help Is Just a SIG Away 



By Cray Augsburg 
Rainbow Technical Editor 



The major reason for any telecom- 
munications network to exist is 
to promote the transfer of infor- 
mation between individuals and groups 
of individuals. If we take this thought 
one step further, we see that the purpose 
of SIGs, or Special Interest Groups, is 
to offer a place for information transfer 
between those sharing a common inter- 
est, be it a pastime, hobby or even a job. 

On Delphi, we see many different 
SIGs. There are SIGs for the users of 
Atari computers, MS-DOS computers 
and many more. There are even SIGs 
for non-computer interests such as 
science fiction. From this, it follows that 
a SIG is a gathering place. It is a place 
to offer information and a place to seek 
information. It is a place we can turn to 
when we need help on a given subject. 
But then, what are we to do if we need 
help finding help? How many of you 
have logged into the CoCo SIG with a 
burning question and found you were 
unable to properly leave a message with 
a question for other users? 

All CoCo SIG users start at the same 
point; they have a million questions 
about how to get around the SIG and 
very little knowledge about how to ask 
those questions of other users. 

How to Ask a Question in the SIG 

The first time you log onto Delphi, 
after a brief tour with "Max," the 



Cray Augsburg is RAINBOW'S technical 
editor and has an associate s degree in 
electrical engineering. He and his wife. 
Ruth Ann. have two children and live 
in Louisville, Ky. His username on 
Delphi is RA1NBOWMAG. 
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system tour guide, you will find yourself 
at Delphi's main menu. You will see the 
prompt MflIN> on your screen. At this 
point, type GROUP CO and press ENTER. 
This command line will take you right 
past the Delphi GROUPS menu directly 
into the CoCo SIG. You will know you 
are in the CoCo SIG because the 
prompt at the bottom left of your screen 
will now read CoCo Sig> and you will 
see a menu of options. 

One of the options on the CoCo SIG 
menu is Forum (messages). Keep in 
mind, on Delphi you only need to enter 
the first few characters of any option for 



that option to be enabled. Only those 
characters that make the option unique 
from any other available selection are 
necessary. So, if you type FORUM, or just 
F, and press enter, you will be taken 
to the public message area of the CoCo 
SIG. 

Once you are in the Forum, you are 
ready to leave your questions. It is 
advisable that new members first leave 
a Forum message announcing them- 
selves as such. In this message, you can 
leave those all important first questions. 
These questions will be answered by the 
staff or by other users who have already 



DATABASE REPORT 



Both the CoCo SIG and OS-9 Online 
have celebrated major landmarks 
within the last few weeks. On the new OS- 
9 Online service, we logged our 1, 000th 
message and, on the CoCo SIG, we 
celebrated passing Forum message 
number 25,000 just a few days before I 
sat down to write this report. 

1 am delighted to announce that thanks 
to a recent revision of Delphi's system 
software, our members can now see what 
the "download count" is on files in the 
database. On both the CoCo SIG and 
OS-9 Online, typing DIR -'FULL when in 
a topic area in the database will show you 
how many times a file has been accessed. 
Download counts should also be visible 
when you are reading a set of files in a 
given group. 

Please note that sometimes, when 
groups are revised or updated, download 
counters may get reset. Also, when 
looking at the download counts in the 
OS-9 Online database, you must re- 
member that the OS-9 Online service has 



only been in existence for a few months, 
so the download counts are not likely to 
be very large yet. In addition, please 
understand that a large download count 
does not necessarily guarantee that a file 
will be desirable, nor does a small down- 
load count necessarily indicate a file is 
not desirable. Nevertheless, all of us on 
staff have long felt that those who do us 
the kindness of uploading files to the 
database have a right to be able to see just 
what sort of activity their files are gener- 
ating, and that members looking for 
material to download are also quite 
interested in that information. 

OS-9 Online Databases: 

This past month we have had a number 
of new files in the OS-9 Online database. 
In the General database section. Chuck 
Hoffman (choffman) has given us a text 
file on how to set up a double-sided boot 
disk under OS-9 Level II, using the 
Rogue distribution disk. In the file 
Pointer Icons in Level II. Rick Adams 



learned their way around the CoCo 
SIG. 

To actually leave a message, at the 
F0RUM> prompt, type ADD and press 
ENTER. At the TO: prompt, you are 
asked who you want to leave a message 
for. Type someone's username or, to 
default to ALL, just press ENTER. The 
next prompt will ask for the subject of 
the message. Give a brief (20 characters 
or so) idea of what the message refers 
to and press ENTER. Next, Delphi will 
ask you for the topic of the message. At 
this point, type GEN (which stands for 
General Information) and press ENTER. 

At this point, Delphi will tell you to 
enter the text of the message; use 
CONTROL-Z to exit or CONTROL-C to 
abort. Go ahead and introduce yourself 
and ask all the questions you need to. 
Pace yourself in the question area, 
though. Many first-time users ask the 
question, "How do I download pro- 
grams'?" You must understand that a bit 
more knowledge of the system is neces- 
sary before a member can learn how to 
download or upload. 

When entering your message, this 
general rule should be followed: After 
you have typed enough characters to 
nearly fill one line of text on your 
CoCo's screen, press ENTER and con- 
tinue your text on the next line. This 



helps in formatting the message for 
other users. You should be able to 
backspace to correct mistakes but, if 
you feel you have made too many, press 
CONTROL-C and you will abort the 
message process. No message will be 
sent, and you will find yourself back at 
the F0RUM> prompt ready to try again. 

When you have finished your mes- 
sage, sign it with your real name. Press 
CONTROL-Z and the message will be 
added to the others in the Forum area. 
Note the message number and then read 
that message to see what it looks like. 

Now, you can go off and "play 
around." Experiment and see what 
features are to be found. Keep in mind, 
using CONTROL-Z will back you out of 
nearly anything you get yourself into. 
Just enter them one at a time and watch 
for the familiar CoCo Sig> prompt. If 
you are online during the late evening 
hours, it is very likely your message will 
be answered within half an hour. So, 
you might want to stop back into the 
Forum area and see if you have gotten 
a response. 

Go to the Forum area, as described 
above. If someone has replied to your 
message, you will be told you have 
wailing messages. Just type READ WAI T- 
ING and press ENTER. Pretty soon, the 
answers to your questions will be scrol- 



ling by on the screen. If, after reading 
a reply, you want to respond to the 
other user, just type REPLY and press 
ENTER. At the TD: prompt, just press 
ENTER. Delphi will know who you want 
to reply to. 

The Forum is an excellent place to 
find an answer for nearly any question 
you have. Not only is it a good place for 
first-time members, it's a great resource 
for anyone who has a problem, or just 
needs a little helping hand. While more 
experienced users sometimes make 
assumptions, if you don't understand 
something, just ask again. Besides 
Forum, the CoCo SIG has many ways 
to help you learn the system. 

Other Sources of Help 

As you experiment while "learning 
the ropes" in the CoCo, or our OS-9 
Online SIG, keep in mind that help is 
only a couple of keystrokes away. Typ- 
ing HELP or a question mark at nearly 
any prompt will give you a chance to 
find out what it is you are doing, and 
what it is you need to do. In the Con- 
ference area, however, you need to 
precede the word HELP or the ? with a 
slash. Just type -'HELP and press ENTER. 

Most of the time, once you have 
asked for help, you are given a list of 
topics to receive help with. Pick the 



(RlCKADAMS) describes the stdptrs file 
that will appear in the Level II distribu- 
tion disk. Rick has also put up a file 
called FFX2 Commands for L II 
BASIC09. which describes the new com- 
mands available in the new GFX module. 

Steve Clark (STEVECLARK) has sent us 
Level 2 From Rogue, additions to 
L2C0DE and L2RDGUE from Kevin Dar- 
ling (KDARL1NG). This concerns extract- 
ing an OS-9 Level II system from the disk 
with the Rogue game. 

In the Applications section, Dennis 
Weldy (OS9ER) has generously given us 
an OS-9 based FORTH, including a FORTH 
shell, interpreter, source code for same, 
and a compiled version of the forth 
interpreter. 

In the Utilities section, Donald R. 
Grafton (GRAFTON) has given us SDRTC, 
a sort routine allowing up to 10 keys for 
the son. Bill Brady (wbrady) has sent us 
a C program to test the screen speed of 
your screen driver. He also has given us 
SYSCflLL.fiSM, which allows you to 
access system calls from within BASlCiw 
programs. Eric Levinson (ERlCLEVtN- 
SON) has sent us a parallel ohm calculator 
that can calculate resistance in parallel 
circuits. He has also sent us a sort pro- 
gram that can handle up to 750 strings 
of 35 characters each. Eric has also given 



us a file called WINDOWS, designed to set 
up windows using O-Pak. Kevin Darling 
has sent us a set of six utilities for Level 
II that show the current active processes, 
module directory, memory map, system 
map and process DAT map, and dump 
selected areas of memory. 

In the Telcom section, Bill Brady has 
sent us BARETERM . C, a bare-bones termi- 
nal program written in C. He's also sent 
us BIGTERM.C, source code for his BigT 
OS-9 terminal program, which I men- 
tioned last month. He has also given us 
XM1B.C, an Xmodem file server, useful 
for allowing someone logged into your 
OS-9 system to upload and download 
files via Xmodem protocol. Greg Law 
(GREGL) has posted KERMIT. FIX, Ker- 
mit Version 1 .7 updates to allow transfer- 
ring binary files. And Mark Sunderlin 
(MEGABYTE) has sent us OS-9 Kermit 
Version 1.6, source code to Kermit. 

In the Graphics section, Bill Brady has 
given us W izDraw, the source code to the 
start-up graphics screen displayed in an 
OS-9 terminal program he is currently 
working on. This file can show you how 
to draw pictures under Level II OS-9. 
Kevin Darling has given us a Graphicom- 
to-OS-9 font converter, which enables 
you to convert Graphicom fonts to fonts 
usable by OS-9 Level II. 



Jay Truesdale (jaytruesdale) has 
sent us our first upload in the 68K-OS- 
9 section (give that boy a cookie!). This 
is an intra-systcm Email file, to let you 
send or receive mail to/ from other users 
on your system. It works a lot like the 
Unix MAIL command. 

Color Computer SIG Databases: 

In the General database section, Don 
Hutchison (donhutchison) has sent us 
a humorous piece titled Restroom Policy. 
Eric Robichaud (EGROB1CHAUD) has sent 
us a worrisome report on the relative lack 
of knowledge of graduating 1987 high 
school seniors. 

In the Utilities database, Paul J. Burke 
(p.ib) has sent us two astronomy pro- 
grams (including a planet locater). 
Steven Shimatzki (SHIM) has given us a 
labeler program. Richard Ferreira 
(SKEEVE) has sent us a filing utility, and 
Dennis Hoin (hackeri) has uploaded 
his Super Disk Utility package. Derrick 
M. Kardos (DIG) has sent us an archive 
utility to enable you to compress files (the 
way the ARC utility under MS-DOS 
works). Andrew Ellinor (cropper) has 
sent us a zapper program for the CoCo 
3. Alan Weston (headly) has sent us 
Solarsim for the CoCo 3. 

In the Graphics section, Mike Fischer 
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WE'RE BRINGING THE COCO 



RAINBOW'S 
BROADENING ITS 
SPECTRUM 

the rainbow and the Delphi Infor- 
mation Utility have joined together 
to allow CoCo owners all over the 
world to connect with one another! 

Delphi is a full-service information 
utility. It offers everything from up- 
to-the-minute news stories from The 
Associated Press to electronic mail 
services. But, best of all, it now has 
a special forum for Color Computer 
owners, and it's operated by the 
people who bring you the rainbow 
each month. 

The CoCo Special Interest Group 
(SIG) features a variety of services, 
including an open forum where you 
can send and receive messages 
from Color Computer owners all 
over the world. It also has several 
databases to which you can upload 
your favorite programs and from 
which you can download programs 
written by other CoCo enthusiasts. 
Some of these databases are basic 
programming, OS-9 and home ap- 
plications. 

When setting up your account with 
Delphi, if you do not have a credit 
card or prefer not to use it, Delphi 
requires that you send $20 to give 
your account a positive balance. This 
will be refunded after your first free 
hour if you choose to no longer use 
the system or it will be applied to 
future connect charges. If you do not 
maintain a positive balance, you will 
be charged $3.50 each month for 
direct billing. 



PEEK INTO THE 
RAINBOW 

The CoCo SIG's conference feature 
allows you to meet electronically 
with other members of the CoCo 
Community. You can join conferen- 
ces with notables such as Dale 
Puckett, Cray Augsburg, Marty 
Goodman, Don Hutchison, Jim 
Reed, Lonnie Falk and others — 
on a regular basis. Conference 
schedules will appear in the rain- 
bow each month. Be sure to check 
online announcements for changes 
and additions. 



THE OTHER SIDE 
OF THE RAINBOW 

On Delphi, you also are able to buy 

rainbow on tape — order a whole 
set, or download an individual pro- 
gram immediately. You can also 
renew your rainbow subscription, 
make a fast and easy order for soft- 
ware or hardware from a multitude 
of vendors, or inquire about prod- 
ucts on the CoCo SIG. 

We also have a number of programs 
that you can download and use, just 
for the cost of the time you spend 
transferring them. There'll also be 
corrections for rainbow articles, 
helpful hints and many other useful 
features. 



FREE LIFETIME 
MEMBERSHIP 

the rainbow is offering subscribers 
a free lifetime subscription to Delphi 

— a $24.95 value — and a free hour 
of connect time — a $7.20 value at 
either 300, 1200 or 2400 Baud — so 
you can sample Delphi and the rain- 
bow CoCo SIG. That's right. Your 
subscription to the rainbow entitles 
you to this $32.15 value as a free 
bonus! 

If you're not a rainbow subscriber, 

just enter your order when you sign 
on with Delphi and you'll get the 
same great deal! For our $31 sub- 
scription fee, you'll get the finest 
Color Computer magazine ever, a 
free lifetime subscription to Delphi 
and a free hour of connect time. 

SAVE EVEN MORE 

Want to save even more? While 
you're oniine you can order, for only 
$29.95, a deluxe package which in- 
cludes the Delphi membership, the 
Delphi Handbook and Command 
Card ($21.95) and a total of three 
hours of connect time ($21 .60). 

Delphi provides us all with Imme- 
diate CoCo Community. Check it 
out today. After all, you can sample 
it for free! 



DELPHI 



Problems? Call Delphi: 

(800) 544-4005 

(617)491-3393 

TYPE: 

GROUP COCO 



COMMUNITY TOGETHER 



How to reach RAINBOW'S Color Computer SIG . . . 



There are several ways to connect lo Delphi and THE 
Rainbow's CoCo SIG. in most cities you will not even have 
to pay long distance charges; you can use special data 
communications networks like Telenet, Tymnet and the 
Canadian Datapac network. 

First, set your terminal program to operate at either 300 
or 1200 Baud (depending on the modem you have), and 
also select either 7 bits with even parity or 8 bits with no 
parity, and one stop bit. (If one combination doesn't work, 
try another.) 

Decide which network you should use. There is no 
surcharge lor Telenet or Tymnet. Canadian residents using 
Datapac will be charged an additional $12 (U.S.) per hour. 

On Telenet: The Uninet network has now merged with 
Telenet. To get the Telenet number for your area, call (800) 
336-0437. Alter you call your local access number and 
make connection, press the ENTER key twice. When the 
"TERMINAL=" prompt appears, press ENTER again. 
When the "@" prompt appears, type C DELPHI and press 
ENTER. 

On Tymnet: Call (800) 336-0149 to get the Tymnet 
number for your area. After you dial your designated 
number and connect, you will see either "garbage" or a 
message saying "please type your terminal identifier." At 
this point, even if the screen is garbled, simply press 'A'. 
When "please log in:" appears, type DELPHI and press 

ENTER. 

From Canada (on Datapac): Call Delphi Customer 
Service at (617) 491-3393 to get the Datapac number for 
your area. After you connect, press the period key (.) and 
ENTER (use two periods if you're using 1200 Baud). Type 
SET 2:1, 3:12G and press ENTER. Now type p 1 3106, 
DELPHI; and press ENTER. Delphi's new rates indicate an 
additional $12 hourly surcharge for evening use of 
Datapac, which means a total of $18 (U.S.) for connect 
time. 

From other countries: Many countries have their own 
data networks that can connect to either Telenet or 
Tymnet. Check with the telephone authorities in your 
country for details on how to sign up for this service. When 
you have an account set up, you can reach Delphi with 
a "host code" of 312561703088 through Telenet, or 
3 1060060 1 500 through Tymnet. ( You'll have to pay the loll 
charges for this connection.) 
Type in Your Username 

If you're already a subscriber to THE RAINBOW, at the 
"USERNAME:" prompt, type JOINDELPHI and press 



ENTER. At the "PASSWORD:" prompt, type RAINBOW. 
Then, ai the "NUMBER:" prompt, type your individual 
subscription number from the mailing label of your latest 
issue of i hi RAINBOW. (II there are one or more zeros at 
the beginning of this number, include them.) 

If you don't already have a subscription, at the "USER- 
NAME:" prompt, type JOINDELPHI and press ENTER. At 
the "PASSWORD:" prompt, type SENDRfllNBOW and press 
ENTER. Have your MasterCard. VISA or American 
Express card ready, because you'll be led through a series 
of questions thai will enable us to put your RAINBOW and 
Delphi subscriptions into effect. In an effort to hold down 
non-editorial costs, we do not bill for subscriptions. 

If you make a typing error, jusi press ENTER and start 
over. Remember that at any point, when you're on Delphi, 
you can type HELP to get help on how lo use the system. 
To get off the system just type BYE. 

If you find that you're unable to log on to Delphi and 
enter the CoCo SIG after following these instructions, call 
us during afternoon business hours at (502) 228-4492. We'll 
be glad to offer assistance. 

Come Visit Us! Type: GROUP COCO 

After you sign in, you'll be prompted to set up your own, 
personal "user name" — Delphi is a friendly service, no 
numbers lo remember and you'll be asked a number 
of questions so Delphi can set up your account. You'll also 
be assigned a temporary password. No time is assessed 
against your free hour of service while you answer these 
questions. 

Delphi will tell you thai your account will be ready after 
6 p.m. the same day if you sign up before noon (Eastern 
time zone.) If not, your account will be ready at 6 p.m. 
the next day. Once an account is opened, each rainbow 
subscriber will be credited with an hour of free lime! 

When you log back in. use your chosen username and 
your temporary password to access the system. Ai that 
point, you will meet Max, who will help you configure 
things and will change your temporary password inio 
your own personal password. This is the password you 
will use for subsequent sessions — or until you change it. 

After Max bids you goodbye, you'll wind up at the 
Delphi Main Menu; type in GROUP COCO and join us on 
the CoCo SIG! 



Also from Falsoft, The RAINBOW MAKER, . . . 



'XStV 



The magazine for Tandy portable and MS-DOS users 

Not only does Tandy produce our favorite CoCo, we think they produce the best and best-priced lap- 
top portable and MS-DOS computers as well. We've found that when satisfied Color Computer users 
decide to add portability or move to MS-DOS, many stick with Tandy. For these people we publish PCM, 
The Personal Computer Magazine for Tandy Computer Users. 

Each month in PCM, you'll find information and programs for the Tandy 100, 102, 200 and 600 portable 
computers. And you'll find even more coverage for their MS-DOS machines, the 1000, 1200, 2000 and 
3000, along with the great new 1000 EX, 1000 SX and 3000 HL. 

FREE PROGRAMS! 

We learned from the rainbow that readers want programs to type in, so each month we bring you an 
assortment of them: games, utilities, graphics, and home and business applications. 

BAR CODE LISTINGS AND PROGRAM DISKS! 

For portable users, PCM is the only home computer publication in the world that brings you programs 
in bar code, ready to scan into memory like magic with the sweep of a wand! For those who don't have 
time to type in listings, we offer a companion disk service with all the programs from the magazine. 

TUTORIALS AND PRODUCT REVIEWS! 

As if all this weren't enough, we offer regular tutorials on telecommunications and hardware; assembly 
language, basic and pascal programming tips; and in-depth reviews of the new software, peripherals 
and services as they are released. Add it all up and we think you'll find PCM to be the most informative 
and fun magazine for this market today! 

To order by phone (credit card orders only) call 800-847-0309, 8 a.m. to 5 p.m. EST. For other inquiries 

call 502-228-4492. 



□ YES! Please send me a one year (12 issues) 
subscription to PCM for only $28/ A savings of 22% 
off the newsstand price. 



Name 



Address 
City 




State 



ZIP 



In order to hold down costs, we do not bill. 

I I My check in the amount of 

Charge to my: I — I VISA I (MasterCard 

Acct. # 



is enclosed. 

I | American Express 

Expiration Date- 



Signature 



"Canadian subscribers U.S. $35. Surlace rate elsewhere $64. airmail $85. Allow 6 lo 8 weeks lor lirsl copy. Kentucky residents add 5% sales tax. 
U.S. currency only, please. 

Mail to: PCM, The Falsoft Building, P.O. Box 385, Prospect, KY 40059 



appropriate selection. Once you have 
finished, you usually will be asked if you 
want further help on a related subject 
orsubtopic. When you are satisfied, just 
press CONTROL-Z. 

If you type HELP at the CoCo Sig> 
prompt, or main S1G menu, you will be 
greeted by a HINTS> prompt. This 
section of the S1G contains several text 
files pertaining to several different 
aspects of SIG operation. To get a list 
of the available help files, just type SCAN 
and press ENTER. You will find referen- 
ces to topics ranging from "Disabling 
Call Waiting" to "Submitting a File." 
While you may not be quite ready for 



some of the selections, many of the help 
files are intended for new users. When 
you come across an entry of interest, 
enter the number associated with that 
entry. You will then be able to read the 
given help file. As before, when you are 
done, a simple CONTROL-Z is all that is 
needed to return you to the SIG menu. 

Some General Notes About Help 

Many present members of the CoCo 
SIG are more than willing to lend a 
helping hand at any time. However, we 
sometimes make assumptions about 
how much another person knows. 
Things second nature to us tend not to 



be mentioned in our explanations. If 
you don't quite follow something, don't 
be afraid to ask again. The most impor- 
tant thing is that you, too, become 
familiar with the system. 

The users on the SIG have a wide 
variety of other interests. You should 
refrain from asking a specific person 
about a specific problem unless you 
know that person is knowledgeable in 
that area. It is best to address most 
questions to all users. That way you can 
get a variety of viewpoints. □ 



(M1KES8) has sent us an Old English font. 
Ken Schunk (kenschunk) has sent us 
several CoCo 3 Hi-Res fonts, including 
a Saratoga, Palo Alto, IBM, and a 
Woodhaven font set. Alan Dekok (alan- 
dekok) has uploaded a tape covers 
program, and Roger Smith (smudger) 
has sent us DIGIT. BA5 for the CoCo 3. 
Don Hutchison has provided PIC DOS, a 
picture saver for the CoCo 3, and Roger 
Bouchard (HARB1E) has sent us some 
stunning Atari 520 ST pictures that were 
converted to CoCo 3 formal. 

In the Data Communications section, 
we have a text file by Ward Christenson 
on the specs for Xmodem, with some 
addenda by Mike Ward (mikeward). 
For MikeyTerm users with a tape-only 
system, we have gotten a proper copy of 
TflPCNV.BAS, to aid such folks in down- 
loading ML program files. 

In the CoCo 3 News and Information 
section. Rich Ries (RR1ES) has sent us 
SEEK. BfiS, a CoCo 3 disk editor pro- 
gram. Robert E. Pierce (rpierce) has 
sent us a character editor for the CoCo 
3 Hi-Res fonts. Chad Rogers (ICMR) has 
sent us a very professional and thorough 
128K / 512K CoCo 3 RAM lest program. 

In the Product Reviews section, we 
have from Harry Seely (altair) a review 
of the the J&R systems 512K upgrade 



board. I posted an extensive comparative 
review of the CM8, Magnavox 8CM5I5, 
and Sony K.VI31 ICR RGB monitors for 
the CoCo 3, including information on 
prices and where to get these monitors. 

In the Games database, Dr. Michael 
Keyes (mikeyes) has sent us a Green 
Beret Simulation. Eric Levinson (ERIC- 
LEViNSON) has sent us a Blockman game. 
Craig Green (spudly) has provided a 
Lotto 40 and 48 game. Kurt Stecco 
(HIGHRailer) has sent us the game Local 
Freight. Richard P. Trasborg (tras) has 
sent a blackjack game. And Steve Macri 
(dracman) has sent us a drag racing 
game called Dragn3. 

Over this last month, our forums on 
the CoCo and OS-9 services have been 
buzzing with anticipation of the long- 
delayed release of OS-9 Level II. As I 
write this report, the first release copies 
are just being sold in the Fort Worth area, 
with the product available elsewhere 
within a week or two. By the time you 
read this, OS-9 Level II will be at your 
local Radio Shack computer store. With 
the arrival of this product, I expect to see 
a great deal of activity in both the forums 
and databases. 

For Disk Extended Color basic users, 
there seems to be a good chance that a 
new release of RickyTerm will soon be 



available, which will support the bit- 
banger port and have a few other im- 
provements. 

Corrections 

In the March 1987 "Database Report," 
I incorrectly stated that HCOPY was a 
BASIC Driver for Greg Geary's Hi-Res 
utility. This is not the case. It is a BASIC 
driver for an ML program developed by 
Dennis Weldy. Please excuse this mis- 
take. 

Also, I want to point out to our readers 
that it was Vaughn Cato of Atlanta, Ga., 
who wrote the superb Bouncing Ball 
Demo that Mike Fischer uploaded to us. 
Our special thanks to Vaughn for this 
outstanding program, which can be 
found in the Graphics section of the 
CoCo SIG's database. 

How to stay in touch with the most 
recent developments relating to the 
CoCo? Just drop by the Delphi CoCo 
and OS-9 Online Special Interests 
Groups now and then! I'll see you all 
there. 



— Marty Goodman 
Rainbow's Delphi Database Manager 



Hint 



RGB Shortcut 



The manual that accompanies your CoCo 3 indi- 
cates you should enter PALETTE RGB upon powering 
up if you have an RGB monitor. To make life a little 
simpler, just type RGB and press ENTER. The command 
PALETTE is not required to precede the selection of 
RGB or CMP. 

David Mills 
Huntington, WV 



Hint . . . 



X Marks the Spot 



Most CoCo enthusiasts know about sending a disk 
directory to the printer; just enter PDKE111 , 254 : DIR. 
In "RENUM With a Twist" [February 1986, Page 
1 12], Frederic Haberer explains how to use the RENUM 
command to find GOTO and GOSUB statements that 
don't go anywhere. To find these unresolved referen- 
ces, enter RENUM*, x, 10, where x is any number 
greater than the highest line number and less than 
65535. A list of the errors will then appear on the 
screen. Now, I combine the two techniques to send the 
results to my printer. Just enter PDKE111,254: 
RENUM*,.*, 10. 

John Valentine 
Pacoima, CA 



May 1987 THE RAINBOW 125 




How To Read Rainbow 



Please note that all the basic program 
listings in the rainbow are formatted for 
a 32-character screen — so they show 
up just as they do on your CoCo screen. 
One easy way to check on the accuracy 
of your typing is to compare what char- 
acter "goes under" what. If the charac- 
ters match — and your line endings 
come out the same — you have a pretty 
good way of knowing that your typing is 
accurate. 

We also have "key boxes" to show you 
the minimum system a program needs. 
But, do read the text before you start 
typing. 

Finally, the little disk and/or cassette 
symbols on the table of contents and at 
the beginning of articles indicate that 
the program is available through our 

RAINBOW ON DISK or RAINBOW ON TAPE 

service. An order form for these services 
is on the insert card bound in the mag- 
azine. 



What's A CoCo? 



CoCo is an affectionate name that was 
first given to the Tandy Color Computer 
by its many fans, users and owners. 

However, when we use the term 
CoCo, we refer to both the Tandy Color 
Computer and the TDP System-100 
Computer. (While many TDP-100s are 
still in service, the TDP Electronics 
division of Tandy no longer markets the 
CoCo look-alike.) It is easier than using 
both of the "given" names throughout 

THE RAINBOW. 

In most cases, when a specific com- 
puter is mentioned, the application is for 
that specific computer. However, since 
the TDP System-100 and Tandy Color 
are, for all purposes, the same computer 
in a different case, these terms are 
almost always interchangeable. 



Rainbow Check Plus 




The small box accompanying a pro- 
gram listing in the rainbow is a "check 
sum" system, which is designed to help 
you type in programs accurately. 

Rainbow Check PLUS counts the 
number and values of characters you 
type in. You can then compare the 
number you get to those printed in the 
rainbow. On longer programs, some 
benchmark lines are given. When you 



reach the end of one of those lines with 
your typing, simply check to see if the 
numbers match. 

To use Rainbow Check PLUS, type in 
the program and save it for later use, 
then type in the command run and press 
enter. Once the program has run, type 
NEW and press enter to remove it from 
the area where the program you're typ- 
ing in will go. 

Now, while keying in a listing from the 
rainbow, whenever you press the down 
arrow key, your CoCo gives the check 
sum based on the length and content of 
the program in memory. This is to check 
against the numbers printed in the 
rainbow. If your number is different, 
check the listing carefully to be sure you 
typed in the correct basic program code. 
For more details on this helpful utility, 
refer to H. Allen Curtis' article on Page 
21 of the February 1984 rainbow. 

Since Rainbow Check PLUS counts 
spaces and punctuation, be sure to type 
in the listing exactly the way it's given in 
the magazine. 

10 CLS:X=256*PEEK(35)+17B 

20 CLEfiR25.X-l 

30 X=25G*PEEI< (35) +178 

40 FOR Z=X TO X+77 

S0 READ Y:W=U+Y:PRINT Z,Y;U 

S0 POKE Z,Y:NEXT 

70 IFW=7985THEN80ELSEPRINT 

"DfiTfi ERROR": STOP 
80 EXEC X:END 

90 DfiTfi 182, 1, 10G, 167, 110, 60, 134 
100 OfiTfl 126, 183, 1, 106, 190, 1, 107 
110 DfiTfi 175, 140, 50, 4B, 140, 4, 191 
120 DfiTfi 1, 107, 57, 129, 10. 38, 3B 
130 DfiTfi 52, 22, 79, 158, 25, 230, 129 
140 DfiTfi 39, 12, 171, 128, 171, 128 
150 DfiTfi 230, 132, 38, 250, 4B, 1, 32 
160 DfiTfi 240, 183, 2, 222, 48, 140, 14 
170 DfiTfi 159, 166, 166, 132, 2B, 254 
1B0 DfiTfi 189, 173, 198, S3, 22, 126, 
190 DfiTfi 0, 135, 255, 134, 40, 55 
200 DfiTfi 51, 52, 41, 



Using Machine Language 



Machine language programs are one 
of the features of the rainbow. There are 
a number of ways to "get" these pro- 
grams into memory so you can operate 
them. 

The easiest way is by using an editor/ 
assembler, a program you can purchase 
from a number of sources. 

An editor/assembler allows you to 
enter mnemonics into the CoCo and 
then have the editor/assembler assem- 
ble them into specific instructions that 
are understood by the 6809 chip, which 
controls your computer. 



When using an editor/assembler, all 
you have to do, essentially, is copy the 
relevant instructions from the rainbow's 
listing into CoCo. 

Another method of getting an assem- 
bly language listing into CoCo is called 
"hand assembly." As the name implies, 
you do the assembly by hand. This can 
sometimes cause problems when you 
have to set up an ORIGIN or EQUATE 
statement. In short, you have to know 
something about assembly to hand- 
assemble some programs. 

Use the following program if you wish 
to hand-assemble machine language 
listings: 

10 CLEfiR200.&H3F00:I=&H3F80 

20 PR I NT "fiODRESS : " ; HEXS ( I ) ; 

30 INPUT "BYTE";B$ 

40 POKE I , VflL ( "4H"+BS ) 

50 I = I+1:G0T0 20 

This program assumes you have a 16K 
CoCo. If you have 32K, change the 
&H3F80 in Line 10 to &H7F08 and change 
the value of I to &H7FB0. 



The Rainbow Seal 



RAINBOW 

CERTIFICATION 
KM 

The Rainbow Certification Seal is our 
way of helping you, the consumer. The 
purpose of the Seal is to certify to you 
that any product that carries the Seal 
has actually been seen by us, that it 
does, indeed, exist and that we have a 
sample copy here at the rainbow. 

Manufacturers of products — hard- 
ware, software and firmware — are 
encouraged by us to submit their prod- 
ucts to the rainbow for certification. We 
ascertain that their products are, in 
actuality, what they purport to be and, 
upon such determination, award a Seal. 

The Seal, however, is not a "guarantee 
of satisfaction." The certification pro- 
cess is different from the review process. 
You are encouraged to read our reviews 
to determine whether the product is 
right for your needs. 

There is absolutely no relationship 
between advertising in the rainbow and 
the certification process. Certification is 
open and available to any product per- 
taining to CoCo. A Seal will be awarded 
to any commercial product, regardless 
of whether the firm advertises or not. 

We will appreciate knowing of in- 
stances of violation of Seal use. 
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DataPack II Plus V4.1 

SUPER SMART TERMINAL PROGRAM 

AUTOPILOTand AUTO-L06 Command Processors 

X-MODEM DISK FILE TRANSFER SUPPORT 

VT-100 6. VT-52 TERMINAL EMULATION 

■ No lof I data using Hi-Res Display, Evan al 1 200 Baud on lha Sariat porl 

a Hi-Res Displays, 26 to 255 columns by - -t lines &. true Upper/Lower casa. 

• 45K Text Buffer when using the Hi-Res Text Disploy and Disk 

• ASCII & BINARY disk file transfer support via XMODEM. 
- Directly record receive data to a disk file while online. 

• VT- 1 00 terminal emulation for VAX, UNIX and other systems. 

« VT- 1 00/52 cursor keys '. position, insert/delete, PF 4, All. Kbd. keys. 

• Programmable Word Length, Parity, Slop Bits and baud rales 300 to 0600. 
1 Complete Full and Half Duplex operation, with no garbled data. 

• Sena full 128 character set from Keyboard with control codes. 

■ Complete Editor. Insert, Delete, Change or Add to Buffer. 

• Variable length, Programmable Macro Key buffers. 

■ Programmable Printer rates from I 10 to QbOO Baud. 

1 Send Files directly from the Buffer, Macro Key Buffers or Disk. 
1 Oisplay on Screen or Print the contents of the Buffer. 
1 Freeze Oisplay &> Review information On lino with no loss of data. 
" Built in Command Menu (Help) Display. 

• And much, much more. 

Supports: Word-Pak I, II, R.S. and Double Density 80 Column Cards 
Oislo Controller w/80 column card & parallel printer 
PBJ Parallel Printer Card and Dual Serial Port (2SP-Pak) 
R. S. Modem-Pak K Deluxe RS-232 Pak, even with Disk. 

Requires 32K & Di3k, Only $59.95 



HI-RES II Screen Commander 

Tired of looking at Lhe 16 line by 32 character display on your 
CoCo? Wish you could sea mors lines and characters? Then HI-RES II 
is the answer, it can give you the big screen display you've always 
wanted. It will display 24 lines of 32, 42. 5 1 . 64 and even 85 true 
upper and lower case characters per line without extra hardware. 

HI-RES II is the most powerful screen enhancement package available 
for the Color Computer, yet it is the least expensive. It is completely 
compatible and transparent to Basic. Once the program is loaded, 
everything works the same as before, only you have a much belter 
display to work with. It even allows you to have mixed text and 
Hi-resolulion graphics on the same screen or have separate text and 
graphics screens. It also has an adjustable automatic key repeal 
feature and allows you to protect up to 23 lines on the screen. 

HI-RES II features over 30 special control code functions thai allow 
you lo change characters per line, protect display lines, change 
background color, position cursor, switch normal/reverse video, 
underline, double size characters, erase line/screen/to end of 
screen, home cursor, character highlight and much more. It works on 
all models of the CoCo with 16, 32 or 64K and provides automatic 
reset control so HI-RES II won't disappear when you press reset. 
Only 24.95 on Tape or $29.95 on Disk 



"The Source" 

Now you can easily Disassemble Color Computer machine language 
programs directly from disk and generate beautiful, Assembler 
Source Code. And "The Source" has all the features and functions you 
are looking for in a Disassembler. 

■ Automatic Label generation and allows specifying FCB, FCC and FDB areas. 

* Disassembles programs directly from Disk or ROM. 

■ Output Disassembled listing with labels to the Printer, Screen or both. 

* Generates Assembler source files directly to disk, or a printed listing. 

* Generated source files are in standard ASCII format. 

* Built in Hex/ASCII dump/display lo locale FCB, FCC and FDB areas. 

* Built in Oisk Directory and Kill file commands. 

■ Menu display with single key commands for smooth, Easy operation. 

* Written in fast machine language, one of the easiest lo use Disassemblers 

Requires 32K Disk $34.95 



The CBASIC Editor/Compiler VI. 1.2 

Do you want to write fast machine language programs but you 
don't want to spend the next few years trying to learn how ??? 

Well with CBASIC, you could be writing them right now! 
CBASIC is the only fully integrated Basic Compiler and program 
odiling syslom available for the Color Computer. It will allow you lo 
take full advantage of all the capabilities available in your color 
computer without having lo spend years trying lo learn assembly 
language programming. CBASIC allows you to create, edit and 
convert programs from a language you are already familiar with 
Extended Disk Color Basic, into fast efficient machine language 
programs easily and quickly. We added advanced features like a full 
blown program editor, Hi-Res lexl Displays and 80 column hardware 
support for editing, compiling and your compiled programs. Plus we 
made it exceptionally easy to use, CBASIC is the friendliest and 
easiest compiler available for the Color Computer. 

•The most complete editor/Compiler I hive seen lor lhe CoCo " 
--The RAINBOW, March 1066 

CBASIC is a powerful lool for lhe Beginner as well as lhe Advanced 
Basic or Machine language programmer. You can write programs 
without having to worry about the Stack. DP Register, memory 
allocation and so on, because CBASIC will do it for you automatically. 
Or. CBASIC will let you control every aspect of your program, even 
generating machine code directly in a program easily. 

CBASIC features well over 100 compiled Basic Commands and 
Functions that fully support Disk Sequential and Direcl access files, 
Tape. Printer and Screen I/O. CBASIC supports All the High and Low 
Resolution Graphics. Sound. Play Bnd Siring Operations available in 
Extended Color Basic, including Graphics GET, PUT. PLAY and DRAW, 
all with 99.9% syntax compatibility. CBASIC also supports the built 
in Serial I/O porl with separate printer fc serial I/O baud rates. You 
can send and receive data with PRINT, INPUT and INKEY commands. 
CBASIC has its own completely integrated Basic Program Editor 
which allows you lo load, edil or create programs for the compiler. 
It is a full featured editor designed specifically for writing and editing 
Basic programs. It has block move 8. copy, program renumbering, 
automatic line numbers, screen editing, printer control and more. 
The Fditor is a verygoodone andcouldbe the subject for review 
all by itself. • —lhe RA INBOW. /larch I 066 

■Comparing ECBs edit mode lo CBASIC "s text editor is like comparing a 
World War II jeep lo a modern sedan Both gel you to your destination 
but what a dil/erence in the ride — Hot Colo, Feburary 1066 

The documentation for CBASIC is an 8 I /2 « II Spiral Bound book 
which contains approximally 120 pages of real information. 

'CBASIC s manual is easy to read and written with a minimum of 
techmcalese. ' —Hot CoCo February , 1066 

The price of CBASIC is J 149.00. It is the most expensive Color 
BBsic Compiler on lhe market, and well worth the investment. 
Compare the performance of CBASIC against any Color Basic 
compiler. Dollar for dollar. CBASIC gives you more than any other 
compiler available. Requires 64K 8. Disk, not JDOS compatible. 

'The price tag it carries seemed a bit steep for an int eger compiler on first 

glance, but when you add 64K, hi-res drivers, and full-screen editing, CBASIC 

begins to look more like a bargain. ' — Hot CoCo February, J 036 

•A Complete Fdil or/Compiler We'll Worth its Price ' - -RAIHBOW I larch 1 066 



TEXTPRO III 
'The Advanced Word Processing System" 

• Hi-Res Displays from 28 to 255 columns by 21 lines (. Upper/Lower Case 

■ Three Programmable Header lines that can be re-defined at anytime. 
1 Programmable Fooler line 6. Automatic Footnote System. 

• 10 Programmable Tab slops & 7 Powerfull Tab Function Commands. 
" Completely Automatic Justification, Centering, Flush left and right. 
" On screen display of underline and Double size characters. 

* Change indents, margins, line length, etc. parameters anytime in the text. 

■ Create and Edit files larger than memory, up to the size of a full disk. 

* Easily imbed any number ol format and control codes. 

■ Automatic Memory sense I6-64K with up to s6K of memory workspace. 

■ Fully supports the use of 80 column hardware cards. 

TEXTPRO III is an advanced word processing system designed for 
speed, flexabilily and extensive document processing. II is not like 
most of the other word processing programs available for lhe Color 
Computer. If you are looking for a simple word processor to write 
letters or olher short documenls. then most likely you'll be betler off 
with one of the other simpler word processors. Bui. if you want a 
powerful word processor with extensive document formatting 
features lo handle large documenls, term papers, manuals, complex 
formating problems and letter writing, then TEXTPRO III is what your 
looking for. TEXTPRO works in a totally different way than most 
word processing programs. II uses simple 2 character abbreviations 
of words or phrases for commands and formatting information that 
you imbed directly in your text. There Bre over 50 different 
formating commands you can use without ever leaving the lext your 
working on. There are no lime comsuming, and often furslrating 
menu chases, you are in tolal control at all limes. The formatted 
output can be displayed directly on the screen, showing you exactly 
what your printed document will look like before a single word is ever 
printed. This includes margins, headers! footers, paga numbers, page 
breaks, underlining, column formating and full Justification, 

DISK $59.95 TAPE $49.95 



EDT/ASM 64D 
64K DISK EDITOR ASSEMBLER 

EDT/ASM 64D is a Disk based co-resident Tax I Editor & Assembler. 
It has a Hi-Resolulion 51. 64 or 85 column by 24 line display, so you 
see your program listings easily and it supports Column cards. The 
disk also contains a free standing ML Debug Monitor, to help you debug 
your assembled programs. 

This is the most powerfull. easy to use Text Editor available in any 
Editor/ Assembler package for lhe Color Compuler. It even has 
automatic line number generation for easy entry of program material . 

* Local and Global string search and/or replace. 

1 Full screen line editing with immediate line update. 
1 Easy to use Single keystroke editing commands. 

* Load dSave standard ASCII formatted Tape/Disk files. 

* Move or Copy single & multiple lexl lines. 

■ Create and Edit disk files larger than memory. 

* Hi-Res Texl Display 28 to 85 columns by 21 lines. 

* Supports Word-Pak I ,ll. & R.S. and Dislo 80 column display cards. 
The Assembler portion of EDT/ASM 64D features include: 

* Supports the full 6800 instruction set. 

* Supports conditional IF/THEN/ELSE assembly 

* Supports Disk Library files (include). 
- Supports standard motorola assembler directives 

■ Allows multiple values for FOB (. FCB directives. 

* Generates listings lo Hi-Res lexl screen or printer. 

* Assembles directly to disk or tape in LOADM format. 

* Supports up lo open disk files during assembly. 

* Allows assembly from editor buffer, Disk or both. 

Requires 32K Disk $59.95 






CoCo-3 512K upgrade $149.95. card wihout Ram $49.95 
Two Drive RAM-DISK program for 512k CoCo-3 $19.95 



To order products by mail, send check or money order for the amount of 

purchase plus (3.00 for shipping &. handling to lhe address below. 

To order by VISA, MASTERCARD or COO call us at (702) 452-0632 

(Monday Ihni Saturday, 8am lo 5pm PST) 

CER-COMP 

5566 Ricochet Avenue 

Las Vegas, Nevada 89110 

702-152-0632 



Corrections. 



"Instant Graphics and Hogs in 
Space" (February 1987, Page 106): 
Due to a production error, part of 
Line 730 is missing from the listing 
as it appeared in the magazine. The 
entire line appears below. 

730 S=PEEK(&HBC) *256 : PCLS2 : SAVEM 
"CHECK" ,S,S+1024*3-1,&HA00J3:PMOD 
E4 , 1 : COLOR1 , : SCREEN1 , 1 : PCLS : LOA 
DM"CHECK" : KILL"CHECX/BIN" 

There is no problem with the pro- 
gram as it appears on RAINBOW ON 
TAPF and RAINBOW ON DISK. 



"Let the Laser Battle Begin" (Jan- 
uary 1987, Page 36): When going 
through the tunnel in Def Mov, it is 
not possible to crash. This can be 
rectified by changing every occur- 
rence of =1 to =5. This allows the 
color codes to be read properly. 

"Joker Poker"(March 1987, Page 
99): While no known error exists in 
the program, several readers have 
had difficulty understanding one 
aspect. The first time you run Poker, 
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PREMIUM PRINTER SYSTEMS 

PLUG-N-GO FOR THE COCO A 



you will get an error message. This 
message asks if you entered 
F$="SCDRES":G0TD2125 to estab- 
lish a scores file. All you need to do 
is make sure you have a formatted, 
non-write-protected disk in Drive 
and enter the above line. This will 
create the score file necessary for 
game execution. 

"The Key to Success" (March 
1987, Page 66): The program CoCo- 
Type by Leonard Hyre contains a 
line that may be confusing to 
those who are typing the listing 
from the magazine. Line 1550 is 
an extraneous line. It can be 
removed from the program with- 
out affecting program execution. 

"'Life of the Party' for $200, 
Please" (March 1987, Page 58): 
The part number designations are 
not indicated in Figure 1, the 
parts list. The correct designa- 
tions are as follows: 



STAR NX-10 



Easy-to-use and ready for heavy 
workloads. System includes the 
NX-10 primer with BLUE STREAK II 
serial to parallel interface and our Soli- 
ware Trio (sec below). 1 Year limited 
warranty serviceable nationwide. 



CITIZEN 120D 



System includes Citizen I20D primer 
with serial interface, cable, and our 
Software Trio (see below). 12 month 
limited warranty. 



SPECS 120cpsDraH, 
30 cpsNLQ, Italics. 
St.bS SuDOfSCnpis. 
Enphasizea, Doublestri-e. 
Proportional International Do: 
Loadable Char . Graph-cs -5SO-1920 
■ - Forward or Reverse n 2 ' 6* 
L.ne Feeds. Friction & Pmn Tractor. 
5K Data Butter. 



These 
are complete 
systems. Nothing 
more to buy! ,^T 

$279 95 

+SIII Shippm?; ami liisuMii.i' 

Reviewed in 



SPECS: l20cpsDratt.25cp5 
NLO). Italics, Sub fi Superscripts. 
Emphasized. Ooubtostnhe, Proporhonal 
tnto'nationai. User Delined Characters. 
Reverse print. Graphics 480- 1 920 dotsjine, 
Fr^tion and Tractor, 4K Butter 



'87 March 

$229 95 



BLUE STREAK II SOFTWARE TRIO 



A serial in parallel interface that can increase 
your data transmission -I fold over conventional- 
compatible interfacing. An additional serial I/O 
port permits port sharing with another serial 
device without recabling. 



SPECS: 300lo9GOOSwilcnable 
BauO Rales, 1 Year Wa'rnniy, Inpjt 
.: p.n Serial. Ouipui 36 Pm Pa/alio' 
and4PinSon.il. 



$4995 +S 2 Shipping 

w/powcr suppl 
+S2 Shipping 



u;c/i95 W -C°~ er ^pp'y 



Type Selection Tutorial Program 

Specify Star/Seikoslia/or Citizens Printer. 

Super (icmprinl Screen Dump 
S".\ I I "dump with grey level shading for color. 

Drayon's Word Processor 2.2 
Create, save & prim customized documents. 



All Three Program, $1995 +« 



ppmg 



DAYTOfo ASSOCIATES,®, INC. 

72( I CLAIRCREST BLDG. C 

DAYTON, OHIO 45424 

OHIO RESIDENTS \DD 6% SALES TAX • COD. ADD $2.00 



IPKRSONAL SERVICE 

(513) 236-1454 

Visa & MasterCard 

within the continental U.S. 



Jl 


6-pin DIN plug 


SWI-SWI0- 


momentary 




switches, normally 




open 


RI-R9 


I0K ohm, '/j-watt 




resistor 


RIO 


22K ohm, tf-watt 




resistor 


Rll 


220K ohm. i/i-watt 




resistor 



For quicker reference, Corrections 
will be posted on Delphi as soon as 
they are available in the Info on 
Rainbow topic area of the database. 
Just type DATA at the CoCo SIG> 
prompt and INFO at (he TOPIC?> 
prompt. 
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Champion 

Good vs. Evil: More than a game/Mark Data Products 141 

Datapack II Plus and Datapack III Plus 

Super Smart Terminals/Cer Comp 142 

Diskman 

Provides Garbling lnsurance/7*of/7/'an Software, Inc 134 

Disto Super RAM 3 

512K Memory Upgrade/CftC Computers 144 

Educational Software 

Discover the History of America/ Vor/c 10 Software 144 

Extender Cable for the Tandy CM-8 Monitor 

Six Feet of Flexibility/Specfrum Projects, Inc 140 

Fourcube 

Tic Tac Toe in 3D/Novasoft 1 39 

Gold Finder 

A Game for Everyone/Tom Mix Software 1 37 

OS-9 Level II 

Versatility, Power and Low Price/Tandy Corporation 148 

The Return of Junior's Revenge 

Arcade Game for the CoCo 3/Computerware 1 35 

Roller Controller 

A Game of Skills/Specfrum Projects, Inc 150 

The SECA Fraction Review 

Help for Students/SECA 136 

Sigmaword 

Instructive Word Processor/S/'gma Software 147 

State the Facts Game 

Capitalize on Your State Knowledge/M/7caron Software 146 

Survey Programs 

Get Your Bearings/ 7". P. Jones 138 
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HOW DO YOO PRESCRIBE A RAINBOW? 



It's simple — Give a RAINBOW gift certificate . 



the rainbow is the perfect 
remedy for an ailing CoCo; let a 
gift subscription perk up your 
friends' tired old computers, the 
rainbow is the information 
source for the Tandy Color Com- 
puter. 

Each month, your friends will 
enjoy the intelligent programs, 
reviews and articles written ex- 
clusively for their CoCo. 

First, your gift will be an- 
nounced in a handsome card. 
Then, all year 'round, they'll re- 
member you and your thought- 
fulness when they get each edi- 
tion of the rainbow — more than 
200 pages loaded with as many 
as 24 programs, 15 regular col- 
umns and lots of helpful hints 
and tips. 

Generosity benefits the giver, 
too. There'll be no more tracking 
down borrowed copies of the 
rainbow. Your collection will be 
safe at home. 

Give a rainbow gift certificate 
and let your friends in on the fun. 
the rainbow is the perfect com- 
panion for the Color Computer! 

Get your ordeir to us by May 25 
and we'll begin your friends' 
subscriptions with the July issue 
of RAINBOW. 



Please begin a one-year (12 issues) gift subscription to 

THE RAINBOW for: 

Name — — 



Address 
City 



.State 



ZIP 



From: 

Name 



Address 
City 



.State 



ZIP 



□ My payment is enclosed.' 

Bill to: □ VISA □ MasterCard □ American Express 

Acct. # Exp. date 

Signature — 

Mail to: Rainbow Gift Certificate 
The Falsoft Building 
P.O. Box 385 
Prospect, KY 40059 

For credit card orders call (800) 847-0309, 8 a.m. to 5 p.m. EST. 
All other inquiries call (502) 228-4492. 

Subscriptions to THE RAINBOW are $31 in the United States; U.S. $38 in Canada. The surface rate 
to other countries is U.S. $68; the air rate, U.S. $103. Kentucky residents add 5% sales tax. U.S. 
currency only, please. All subscriptions begin with the current issue. Please allow 6 to 8 weeks for 
delivery. In order to hold down non-editorial costs, we do not bill. 



REVIEWING 




Keeping Track 

Editor: 

I must assume someone spent 10 
minutes cranking out a review of a few 
hundred words that failed to provide an 
accurate personal account of Keeping 
Track's uses (March 1987, Page 142). I 
am particularly dismayed to realize the 
reviewer used 5-year-old technology to 
test a current utility program. The 
PCLEflR 1 bug has not occurred on any 
of the CoCos (both 2 and 3) in use 
throughout our company. 

A comparison was drawn between 
Directory Print and the "bare bones" 
command POKE 111,254:DIR. The 
versatile aspect of the CoCo means 
there is always more than one way to do 
any task, but methods can only be 
compared if they produce identical 
results. There is sufficient foolishness in 
this review to write several pages of 
rebuttal; however, enough is enough. 
Paying customers are the least forgiv- 
ing, but none of them have ever come 
to us with any complaints about Keep- 
ing Track. 

Ian Mil/arc/ 
Duck Productions 



Editor: 

Having read the review of Keeping 
Track in March 1987, I feel there are a 
number of misconceptions that should 
be cleared up. 

First, D is a high-speed machine 
language program with a BASIC loader 
that allows the use of the command 
RUN"D. The D program automatically 
loads and runs any file, machine lan- 
guage or BASIC. D gives continuous 
access to any length of directory and 
indicates the number of granules in each 
program, as well as the free disk space 
and users disk names — in less than four 
seconds. 

Second, the speed of Disk File Ad- 
dress, like so many other programs, is 
dependent upon the printer baud rate 
and, therefore, the speed of data 
transfer. 

Third, Directory Print does not bomb 



out. When using the command PCLEAR 
1 (not PCLEflR 0) in a program, the 
ROMs in some computers produce an 
SN Error. It has never happened on any 
of the CoCo 2 or CoCo 3 machines here 
but, when it does crop up, it is generally 
attributed to Extended Color basic, 
not the many programs that use PCLEAR 
1. Directory Print automatically for- 
mats and prints up to eight disk direc- 
tories on a single S'/^-by-l 1 page. 

Fourth, the line-list protection is a 
remnant of a copy-protection system 
that Duck Productions no longer uses. 
The DIR and LIST commands can be 
hobbled on any computer by POKE 
3B3.158 and restored to operation by 
POKE 383,57. 

When summing up any software 
package, it is important to keep in mind 
the type of user it is aimed at. Keeping 
Track was designed for the average 
person, who wants a maximum of 
organization with a minimum of effort. 
With this in mind. Keeping Track has 
been permanently re-priced at $14.95 
($19.95 Cdn.). 1 am sure the more 
technical types who repair their own 
disk drives, etc., will be buying much 
more detailed (and expensive) utilities. 

1 am disappointed with the apparent 
lack of attention to detail in this review. 
This is not sour grapes by any means. 
On the contrary, 1 am always looking 
for constructive criticism and sugges- 
tions on how to improve my work. 

Gary Mills 
Author 



Colorscan 

Editor: 

I would like to thank reviewer Gay 
Crawford for her thorough and favor- 
able review of our program, Colorscan, 
for the CGP-220 Color Ink-Jet printer. 

However, there are several things that 
I would like to comment on. First, the 
maximum banner length is 27 feet, not 
27 inches. Second, the program will 
work with ADOS if the ADOS DIS- 
ABLE command is used. 



It was also noted in the review that 
to exit the program you must press the 
reset button or turn off the machine. 
This is true. But, this has been the case 
with all WHITESMITH software, and we 
have never received any complaints 
before. 

Eric While 
WHITESMITH Partnership 



CMOS Conversion Kit 

Editor: 

Marty Goodman's review of the 
63B09E and 63B2I chips deserves com- 
ment. He was right to say that these 
products are not meant for the casual 
tinkcrer. They are too expensive for all 
but the most specific applications. It's 
difficult to install them in the CoCo 3 
unless you have experience in desolder- 
ing chips. Furthermore, he was right to 
say there is currently no provision for 
adding a portable disk drive. 

What Marty doesn't realize is that a 
couple of chips and a battery aren't 
meant to turn the CoCo into a laptop 
computer that will handle the spread- 
sheets and word processing tasks of 
typical users. Thumb through RAIN- 
BOW, however, and you'll see the CoCo 
harnessed for robotics, music synthesis 
and MIDI control, and signal process- 
ing, including speech recognition. In 
many cases, these functions are needed 
where an AC cord won't easily go. 

Marty complained about the intro- 
ductory price, but he'd have to buy 
several hundred dollars worth of other 
items before he could buy these chips in 
single quantities. Most likely, his dis- 
tributor, like mine, would balk until he 
put in a minimum order. However, I've 
reduced the prices to $34.95 for the 
CPU and $ 1 2.95 for the PI A. But again, 
these chips are not meant for inexpe- 
rienced tinkerers. 

Mitch Gould 
CMOS Conversions 
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RECEIVED & CERTIFIED 

The following products have recently been received by THE RAINBOW, 
examined by our magazine staff and approved for the Rainbow Seal of 
Certification, your assurance that we have seen the product and have 
ascertained that it is what it purports to be. 

This month the Seal of Certification has been issued to: 



Checkbook III, a financial program de- 
signed lo aid in checkbook maintenance. 
This program maintains current balance, 
tracks checks written, and allows ihe user to 
catalog each check into one of nine expense 
categories. For the CoCo 3. Requires one 
disk drive. SECA, P.O. Box 3134. Gulfport, 
MS 39505; (601 J 832-8236. $19.98 plus $3 
S/H. 

Checkerboard Filesort, a 32K filing pro- 
gram. Machine language routines handle 
data entry, editing, reviewing, searches and 
sorting. For the CoCo 1 or 2. Seibyte 
Software. Box 6464. Bakersfietd. CA 93386: 
(805)366-4540. Tape only. $16.95. 

CoCo3 Cribbage, a 128K graphics version 
of the classic card game. Enjoy the game and 
learn about CoCo 3 programming. For the 
CoCo 3. Bob van der Poei Software. 17435 
5 7 tli Avenue. Edmonton. Alberta. Canada 
T6M I El: Disk. $13.95: Tape. $14.95. 

CoCo Checkbook, a 16K program to track 
expenditures, both by check and cash, by 
category or account, and to make using a 
budget easier. For CoCo I, 2 or 3. Requires 
one disk drive. Bob's Software, P.O. Box 
391. Cleveland. OH 44107; $25 plus $2.50 
S/H. 

CoCo MIDI 2, a 64K program for musi- 
cians. Let your CoCo talk to your MIDI 
music synthesizer. Includes MIDI hardware 
interface, 2 MIDI cables, detailed manual 
and software. For the CoCo I, 2 or 3. 
Requires Y-Cable or Multi-Pak. Speech 
Systems, 38 W. 25 Deerpath Road. Batavia. 
IL. 60510; (312) 879-6880. $149.95. 

Diskman. a 32K utility program for Ihe disk 
drive user. Make backup directories, restore 
lost directories, examine and change sectors, 
and restore and alphabetize directories. 
Tothian Software, Inc., Box 663, Rimers- 
burg. PA 16248; $21.95. 

FKEYS III Version 1.3, a I28K function key 
utility. FKEYS 111 can be programmed for 
20 different funciions. Custom versions can 
be saved lo disk and loaded into RAM. For 
the CoCo 3. Gimmesoft. 4 Hallfield Court. 
Baltimore. MD 21236; (301) 256-7558, 
$19.95 plus $2.50 S/H. 



Gridiron Strategy, I28K football Simula- 
tion game. For the CoCo 3. Requires one 
disk drive. SPORTSware. 1251 S. Reynolds 
Road. Suite 414. Toledo. OH 43615; (419) 
389-1515. $29.95. 

HR-1, a collection of three Ham radio 
programs. The Morse code program is 
designed as a practice aid. An antenna 
design program calculates the length and 
spacing of a side-spaced Yagi antenna up to 
four elements. A DX station program allows 
typing notes onto the screen and then 
looking up the countries for a given prefix. 
For the CoCo I, 2 or 3. Dynamic Electron- 
ics. Inc., P.O. Box 896. Hartselle, AL35640; 
(205) 773-2758. $11.95 plus $3 S/ H. 

IMML3, a I28K mailing list program that 
will handle up to 200 records in a file. 
Features onscreen editing and ML sorts on 
any field. For the CoCo 3. CMD Micro 
Computer Services Ltd., 10447 124th Street. 
Edmonton, Alberta, Canada T6M 1E1; 
(403) 488-7109, $16.45 plus $2 S/H. 

The Lcvitical Offerings, a Bible study 
program. The disk includes five studies on 
the offerings in Leviticus, and the entire 
King James text of the passages studied. For 
the CoCo 1, 2 or 3. Sovereign Grace Soft- 
ware, 221 High view Drive. Ball win. MO 
63011; (314) 227-3238. $9.95 plus $2.50 
S/H. 

SEAL 

Magazine Index System 2.0. a I6K database 
program to catalog magazine articles. This 
new release maintains all the features of the 
original. Also supports multiple drive sys- 
tems, allows searches on both description 
and source fields, and has faster search 
algorithms. For the CoCo 1, 2 or 3. CMD 
Micro Computer Services Ltd., 10447 124th 
Street, Edmonton. Alberta. Canada T6M 
I El; (403)488-7109, $14.95 plus $2 S/ H. 

Multi-Label III, a 128K label creating 
program. Features include 40-by-24 or 80- 
by-24 Hi-Res text screen, Fl upper-/lower- 
case toggle, F2 40/80 column toggle, mul- 
tiple printer codes, error-trapping and 
break-trapping. For the CoCo 3. Gimme- 
soft. 4 Hallfield Court. Baltimore. MD 
21236; (301) 256-7558, $14.95 plus $2.50 
S/H. 



RGB Patch, a program designed to take 
CoCo programs that display black and 
white on RGB monitors when using the 
CoCo 3 and fix them to display in color. 
RGB Patch will not work for ROM packs, 
programs that run under OS-9 or BASIC 
programs. Works on most machine language 
programs loaded by CLOflDM, L0ADM, DOS 
or RUN. Spectrum Projects, Inc., P.O. Box 
264. Howard Beach, NY 11414; (718) 835- 
1344. Disk only, $24.95 plus $3 S/H. 



Roller Controller, a I28K arcade-type game 
that includes six different screens and three 
skill levels. Colored marbles start at the top 
of the maze and roll down the planks. The 
object is to guide the marbles into the correct 
color bin by opening and closing the trap 
doors. For the CoCo 3. Spectrum Projects. 
Inc., P.O. Box 264, Howard Beach, NY 
11414; (718) 835-1344. $29.95 plus $3 S/H. 



VCR Database & Mini Title Screen Maker, 
64K Disk programs for cataloging and 
printing out VCR tape data, and personal- 
izing VCR tapes. For the CoCo I, 2 or 3. 
SECA, P.O. Box3134. Gulfport, MS39505: 
(601) 832-8236, $20.98 plus $3 S/H. 



Video Titler Version 2.0. a program to 
generate an opening slate for videotaped 
programs or movies. Information about the 
upcoming production is displayed on the TV 
screen and is recorded for a short time by 
the VCR. For the CoCo 1, 2 or 3. Griffin 
Enterprises. Box 6104. Sumter, SC 29150; 
(803) 773-8275. $10. 



The Seal of Certification program is 
open to all manufacturers of products lor 
the Tandy Color Computer, regardless of 
whether they advertise in THE RAINBOW. 

By awarding a Seal, the magazine certi- 
fies the product does exist — but this does 
not constitute any guarantee of satisfac- 
tion. As soon as possible, these hardware 
or software items will be forwarded to THE 
RAINBOW reviewers for evaluation. 

— Judi Hutchinson 
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DIGISECTOR 

DS-69B 

VIDEO 

IGITIZER 

FOR THE 

COCO 3 



,OPf* otlOH !!! 



<L 




USE YOUR COCO 3 TO ITS FULL POTENTIAL! 

Use The Micro Works' DIGISECTOR™ DS-69 or 
DS-69B and your COCO 3's high resolution graphics 
to capture and display television pictures from your 
VCR or video camera. The DIGISECTOR™ systems are 
the only COCO video digitizers available that 
accurately capture and reproduce the subtle shades of 
gray in TV pictures! 

• COLOR: Add color to your screen for dramatic 

special effects. 

• HIGH RESOLUTION: 256 by 256 spatial resolution. 

• PRECISION: 64 levels of grey scale. 

• SPEED! 8 images per second on DS-69B, 

2 images per second DS-69. 

• COMPACTNESS: Self contained in a plug-in 

Rompack. 

• EASY TO USE: Software on disk will get you up and 

running fast! 

• COMPATIBLE: Use with a black and white or color 

camera, a VCR or tuner. 

• INEXPENSIVE: Our low price puts this within 

everyone's reach. 

POWERFUL C-SEE 3.3 SOFTWARE 

This menu-driven software 

will provide 5 and 16 shades 

of gray to the screen and to 

the printer with simple 

joystick control of 

brightness and contrast. 

Pictures taken by the 

DIGISECTOR™ may be 

saved on disk by C-SEE 3.3 

and then edited by our 

optional MAGIGRAPH, or by COCO MAX or 

GRAPHICOM. This versatile new software is included 

in both DIGISECTORS™ 




DS-69B and C-SEE 3.3 
DS-69 and C-SEE 3.3 



$149.95 
$ 99.95 



TRADE IN YOUR OLD DIGISECTOR™ 

If you already have one of The Micro Works' DS-69 or 
DS-69A DIGISECTORS™, you may return it to us and 
we will upgrade your unit to a DS-69B. 



UPGRADE DS-69A to DS-69B 
UPGRADE DS-69 to DS-69B 



$49.95 
$69.95 



The DS-69B comes with a one year warranty. Cameras 
and other accessories are available from The Micro 
Works. 

NO RISK GUARANTEE 

If you are not completely satisfied with the performance of your new 
DS-69B, you may return it, undamaged, within ten days for a full 
refund of the purchase price. We'll even pay the return shipping. If 
you can get any of our competitors to give you the same guarantee, 
buy both and return the one you don't like. We know which one 
you'll keep. 



COCO 3 SCREEN 



Terms: Visa, Mastercard, Check or C.O.D. 



TH mD©o^§) 

Purveyors of Fine Video Digitizers Since 1977. ^^©[^Jj^^ 1 



P.O. Box 1110 Del Mar, CA 92014 (619)942-2400 
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Diskman Provides 
Garbling Insurance 

Scrambled disks are the computer hacker's greatest fear. 
We keep backup copies of our disks, but keeping them 
current is a tough job. The most common problem in disks 
is garbling of the most-used portion of the disk, the 
directory track. Diskman is a utility that will make a backup 
of the directory on the disk itself, or on a separate disk. 
Besides providing this garbling insurance, Diskman also 
allows examination and changes to any sector of a disk, 
interchanging or alphabetizing of files, and scanning and 
printing out of directories. 

The program is written for a minimum 32K CoCo. It is 
supplied in disk form only and. though written for a Radio 
Shack printer, can be easily modified for any printer. I ran 
the program on my CoCo 3, RS-DOS disk system, and an 
Epson FX-80 printer with no problems. 

Upon running this BASIC program, a menu with nine 
options is presented. Option I makes a backup directory 
either on the same disk you are working with, or on a 
separate disk. If the backup is produced on the same disk, 
it uses up two granules of space, leaving 66 free granules 
for storage. If the backup directory is placed on a separate 
disk, it not only avoids using the space on the parent disk, 
but provides a dedicated disk upon which all directories can 
be stored, maintained and viewed. 



GRAFPLOT 



NEW ! — THE 1 

BRAFPLOT DEMOl f,j 

• S.OO DISK li TAPE -9i 
REFUND M/PURCHA8E.« 
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COMPATIBLE 
WITH COCO 3 

30 DAV 

UNCOND I T I ONAL 
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NEW! s 
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PREADSHEETS & 




a-S-fULL-PAGE 



28- 



Months Since T-Bl 1 1 Investments 

* AUTOMATICALLY LOADS DATA FROM MOBT POPULAR SPREADSHEETS. 

* 29 1 GRAPHING SYMBOLS AND UNLIMITED OVERLAY OF DATA. 
IK AUTOMATICALLY SC.ALE3 AND LABELS ALL THREE OF THE AXES. 

* CALCULATES MATH FUNCTIONS, INTE6RALS AND MOVING AVERAGES. 

* FULLY AUTOMATIC, MENU DRIVEN W/ COMPLETE ERROR TRAPPING. 

* FULL-PAGE BCREEMPRINTB ON ANY PRINTERl SPECIFY WITH ORDER . 

REQUIRES 32K EXT. BASIC! TAPE - MO. OO DISK - «43.0O 



PRINTER »£ ICtUTC J^CTJCCt UXXL.XTV 

UNIVERSAL SCREENPRINT PROBRAM 

» COMPATIBLE WITH COCO III! ! 

* -PERFECTLY SIMPLE" TO OPERATE - "SIMPLY PERFECT" RESULTS! 

* "PERFECTLY COMPATIBLE" WITH ALL DDT MATRIX PRINTERS! 

* GET "PERFECT CONTROL" OFi HEIGHT, WIDTH, POBITION, 

BAUD RATE, DOT DENSITY, NEGATIVE IMAGES, ETC. 

* THE "PERFECT SOLUTION" TO YOUR GRAPHICS PRINTING NEEDS! 

* COMPATIBLE WITH GRAPHICOM AND COCO MAX PICTUREB! 

♦ ONLY V2S.OO OIV4 DISK OF* TAPE ■» 



BUY BOTH PROGRAMS He SAVE • 1 O . OO 

CALL NOW FOR FREE INFORMATION <413> 347-7337, OR WRITEl 

HAWKE8 RESEARCH BERVICEBl 839 STANFORD AVE, OAKLAND, CA 94608 
VDUR PERSONAL CHECK IS WELCOME! SHIPMENT WITHIN 48 HOURS! 

ADD 43.00 SHIPPING ON ALL ORDERS. CA. RESIDENTS ADD BALES TAX 



Option 2 provides the means for restoring a lost or 
garbled directory. The restoration can be accomplished 
either from a backup directory on the same disk, or from 
the separate directory disk. A warning sound is produced 
prior to accomplishment, and the instructions remind you 
to keep the backup directories up to date or suffer the 
consequences! 



"A warning sound is 
produced prior to 
accomplishment, and 
the instructions remind 
you to keep the backup 
directories up to date or 
suffer the 
consequences! " 



With Option 3 you can examine and change any sector 
of a disk. As the instructions say, examination is harmless 
enough, but you had better know what you are doing if you 
make changes. For this reason, another warning is sounded. 
Finding the track or granule is easy, requiring only a TI2 
(Track 12) or a G7 (Granule 7) type entry. Entering the 
desired sector results in the 256 bytes of that sector 
appearing on screen. The cursor can then be moved among 
the bytes with arrow keys, and the values of the bytes can 
be seen in both hexadecimal and decimal values. Printouts 
of the 256 bytes of a sector can be obtained. Pressing the 
E key allows you to change the value of the byte the cursor 
is on. 

Option 4 allows directory reorganization subject to the 
user's desire. Option 5 alphabetizes the directory upon 
command. Option 6 provides for viewing the catalog of 
directories you have put on the separate dedicated disk. It 
allows the user to browse through the entire list of 
directories. They are presented with a number of free 
granules on the parent disk, file names with extensions, 
types of files, and whether the files are in binary or ASCII 
format. To view the directory of an individual parent disk. 
Option 7 is used. 

To obtain a printout of the catolog of directories (Option 
6), use Option 7. The printout will contain all the informa- 
tion in Option 6 plus the size of each file in granules. 

The program is user-friendly and does not require any 
special computer expertise, except in Option 3 where 
changing the values of bytes may be desired. The four pages 
of instructions are clear and easy to follow. One minor 
comment: It would be nice if the program allowed the use 
of multiple disk drives, thus eliminating the insertion and 
removal of disks from a single drive. 

Diskman is useful for the protection of disks and provides 
the ability to reorganize and keep track of disk directories. 
It is certainly worth its price. 

(Tothian Software, Box 663, Rimersburg, PA 16248; S21.95) 

— Mel Siegel 
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The Return of Junior's 

Revenge . . . 

This Time on the CoCo 3 

Those of you waiting eagerly for a new arcade game to 
brighten up your CoCo 3 need wait no longer. Computer- 
ware's The Return of Junior's Revenge is a version of the 
popular arcade game "Donkey Kong Junior," and of 
Computerware's own Junior's Revenge, made especially to 
strut the 3's new graphics and colors. While the game isn't 
perfect, overall it is very good, especially considering how 
quickly it came out after the 3's debut. 

The Return of Junior's Revenge is supplied on a copy- 
protected disk and loads easily into any I28K or5l2K Color 
Computer 3. The disk is backed by a 90 day warranty; after 
that, you must pay $8 for a replacement if anything happens. 
Once the game is loaded, you have the option of using RGB 
(for the CM-8, Magnavox or Sony monitors) or Composite 
(for composite color monitors and TVs) modes. 




You can play either a demo mode, in which you only lose 
a player by falling and your high score is not kept, or regular 
mode, in which you can lose a player by running into an 
opponent as well as by falling. In the game, you play the 
part of Junior, whose father, the gorilla, has been captured 
by Luigi. It is your job to free him, and you'll have four 
different screens (and many more levels) to traverse before 
you'll even get close. 

Luigi has put your dad at the top of the screen in a cage 
(how humiliating!) and has sent out "Vinegators," little 
snapping creatures that crawl up and down the vines, to 
make sure nobody gets to him. But, being the ambitious 
little fellow you are, you're going to try. You'll have to climb 
up the vines, jump over the Vinegators. scurry across the 
platforms, hop from island to island to avoid falling in the 
water, and grab the key to unlock the cage. Along the way, 
you can touch the apples that are found on the vines and 
drop them on the Vinegators. 

If you've managed to survive, the next stop is the chain 
screen. Here, you'll have to push keys into the six locks that 
stake your dad's cage down. But, in addition to Vinegators, 
you'll have to beware of the ZuZu birds. ZuZu birds fly 



around and try to peck Junior off the chains. The trampo- 
line screen follows later, where you'll have to use moving 
chains and trampolines to swing your way up to Dad. 
Finally, you'll reach Luigi's Hideout. At the Hideout, 
conveyor bells and sparks threaten to make life hard for 
poor Junior. Can you guide him to the top in one piece? 

The game is well-conceived and I enjoyed playing it. 
Using 16 colors at once and better graphics make each of 
the four screens come alive. Perhaps a little more time could 
have been spent on the graphics detail, although there is a 
big improvement from the CoCo 1/2 version. Most of the 
animation was smooth, and cute "intermission" scenes were 
presented between some levels. 

The sound effects, while not bad, were quite annoying. 
I had to turn the sound down after playing for a few minutes. 
Also, the program does not work well with the old joysticks; 
I strongly recommend the deluxe joysticks. 

Revenge is jolly fun to play and takes a while to master. 
It requires a bit of strategy — not just straight "shoot-'em- 
up" reflexes, although you'll certainly need a fast reaction 
time to survive. 

I liked this game, and I recommend it to any CoCo 3 
owner as a good one you'll enjoy playing repeatedly. There 
are minor things, such as no pause key, that are irritating, 
but as the first arcade game for the CoCo 3, The Reiurn 
of Junior's Revenge is certainly a step in the right direction. 

(Computcrwarc, Box 668, Encinitas, CA 92024; 619-436- 
3512. $34.95 plus S2 S/H) 

— Eric W. Tilenius 
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The SECA Fraction Review 
Offers Help to Students 

Fractions? Least common denominator? What's that? 
The SECA Fraction Review from Southeastern Computer 
Arts is designed to help students review fractions by 
allowing them to add or subtract using either single or 
double digit denominators. Written by Darryl W. Hawkins, 
the program allows the user to decide whether he or she will 
add or subtract fractions using common denominators or 
noncommon denominators. The ultimate objective is to 
arrive at the answer and to be sure it has been reduced to 
the lowest common denominator. When I tested this 
program, 1 found just how dependent upon calculators and 
computers I had become! 

The program uses the normal CoCo screen display for 
the menu selection screens and score card screen. A Hi-Res 
screen is used for the actual test (or game, if you prefer). 
The Hi-Res screen is well laid out and easy to read. It is 
divided into three sections: the left side showing the 
problem, the right side showing the possible answers, and 
the bottom containing the number right and wrong, as well 
as the player's score. 

Scoring consists of two values. One is calculated by 
dividing the number of correct problems by the total 
problems given and then converting to a percent. For 
example, eight correctly answered problems out of 10 yields 
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Computer 
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Kellynews is now available and contains news, 
hints, programs and articles from the crew at Kelly 

Software. We are Canada's largest national 
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a value of 80 percent. The second value is a point total for 
the round. Points are determined by several factors, such 
as the level of difficulty, the speed or length of time that 
it took the user to answer the problem, and whether or not 
help was needed to arrive at the answer. The user could play 
five rounds and score 100 percent on each round, yet the 
points awarded may be different depending on the various 
factors. For example, I scored 1 00 percent on two rounds 
of play, acquiring 239,947 points for one round and 239,725 
points for the other round. At the end of each round of play 
(10 problems), the final percent and point values are 
displayed on the screen. Also displayed are the number of 
problems right with help and the number of problems wrong 
with help. 

The author has provided two help factors for the user who 
gets stuck on a problem. By pressing the L key, the student 
can see the denominator of the answer, although this will 
not be the denominator of the final answer. For example, 
when adding y 8 and '/io-. pressing the L key will show an 
answer of ?/80. The student can can see a common 
denominator for both fractions. If still stuck, the user can 
press the H key for more help. Doing this will show an 
answer of 38/80. However, 38/80 can still be reduced. Of 
the five possible answers showing on the screen, the user 
must select the correct one, or the "most correct" one. Thus, 
if 38/80 and 1 9/40 appear as answers, the correct one is 19/ 
40 since it is the answer reduced to the lowest terms. 

Fraction Review also has a provision for maintaining a 
score card of the 10 highest scores. This makes it possible 
for a user to see his scores or for 10 students to play one 
round each and then see how each ranked in score at the 
end. 

I asked my sixth grader, Monica, to try the program. Her 
class is now working with fractions. After she played a few 
rounds, I asked her what she thought. She replied, "Fine 
with me. I could use it. It is helpful and the screen is easy 
to read." 

The SECA Fraction Review would be a good program 
for teachers to use. Individual students who are having 
problems with fraction addition and subtraction could use 
it and would have fun while doing so. Or, the class could 
be divided up into teams. The high scorer from each team 
could compete for the class championship, with a prize 
going to the team whose scorer ended up as the winner. 
Parents could use this at home to help their children make 
math study a little more enjoyable. 

I have two minor complaints about this program. First, 
the author states the grade levels are 5 through 8. I think 
it would be more appropriate for grades 4 through 6. In our 
school district, students are introduced to fractions in the 
fourth grade; by the sixth grade, they are multiplying and 
dividing fractions. I cannot picture an eighth grader getting 
much use from the program. Second, a feature could be 
added to the score card so that, if a team is playing, a 
running total team score is also displayed. Otherwise, I 
highly recommend this piece of educational software. 



(SECA, P.O. Box 3134, Gulfport, MS 39505; 601-832-8236, 
$24.98 plus $3 S/H) 



— Mark S. Camp 
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Gold Finder — 
A Game for Everyone 



Do you have games that have umpteen screens but you 
can't get past the third one? Or games that have only three 
or four screens and go back to the first screen again? Would 
you like to design your own screens but are not a pro- 
grammer? Do you have games you have memorized and can 
breeze though without losing a man and, thus, have lost 
interest? Well. Gold Finder from Tom Mix is a game for 
everyone. 
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For arcade game wizards who can get though the first 
round of game screens most of the lime, try 70 prepro- 
grammed levels plus 236 of your own design for a total of 
306 levels to play. For those who are not so good, start at 
any level. If you can't make it past the third level, just edit 
the level to make it easier. (Don't do this on your original 
copy; do it only on a backup.) The only rule in creating a 
level is that you must have four enemies and yourself on 
the screen. Other than that, you are free to put dissolvable 
bricks, undissolvable bricks, ladders, ropes and gold on the 
screen in any order or pattern you like. ENTER saves the level 
to disk, clear clears the screen, shift-* edits the level 
selected in the options menu, and BREAK returns you to the 
title screen. At the title screen, pressing ENTER lets you view 
the high scores. 

SHIFT-0 takes you to the options menu, where you select 
one or two players, what level to start on, which drive to 
load levels for each player, and which drive to save levels 
to. All drive selections default to Drive 0; all other options 
default to Drive 1. 

Pressing the right joystick button starts the game at the 
level selected in the options menu. If you start from level 
one and score high enough, you can put three initials in the 
high score screen and it is written to disk. This game is a 
lot like Gold Runner from Tom Mix, with a few exceptions. 
You move faster than the enemies and, when you pick up 
a piece of gold, it is deposited on a conveyor belt at the 
bottom of the screen and moves to the left side of the screen. 
Here it is dropped into a bucket and slowly carried to the 



top of the screen. When you clear the sceen of all the gold 
pieces, you must wait until the last gold piece reaches the 
top of the screen before climbing one of the ladders or riding 
the elevator to the top. If you ride the elevator to the top 
without getting all the gold or don't wait for the gold to 
get to the top of the screen first, you will be killed. You can 
stay away from the enemies by outrunning them, dissolving 
dissolvable bricks and trapping them, or dropping through 
the hole to the next level. Caution: Dropping into a hole 
on the bottom level can be deadly — you can't climb out. 
If you drop into a hole, pressing R restarts the level but it 
will cost you one man. 

Scoring is as follows: 250 points for picking up a piece 
of gold; 125 points when the gold is deposited at the top 
of the screen; and 1500 points for completing a level. You 
get one extra man each time you complete a level. 

The game loaded fine the first time. The disk should be 
backed up since it is accessed each time you go to the next 
level. The instructions are printed on a single sheet but are 
very complete, with one minor exception. The instructions 
state that there are 69 levels on the game disk; mine had 
70 levels. 

Overall. I rate Gold Finder as one of the best games I 
have played. I like the fact that I can modify the levels for 
easier or harder play and that I can create my own screens. 

The game does work on the CoCo 3 but uses artifact 
colors and is in black and white on an RGB monitor. 

(Tom Mix Software, P.O. Box 201, Ada, MI 49301; 616- 
676-8172, Disk only, $27.95 plus S3 S/H) 

— Mark Bullon 
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S urvey Programs for CoCo 

By Stanley Townsend 

When I got this old gray CoCo five years ago, one of my 
first attempts at programming was aimed at coming up with 
surveying programs. I'm a licensed land surveyor who 
occasionally brings work home, and 1 wanted something 
more powerful than my programmable calculator to help 
grind out coordinate geometry problems. As a newcomer 
to BASIC, I got no further than a rough, bare-bones traverse 
module before I realized how big the task before me was 
and set it aside. Since then I have watched the pages of 
RAINBOW and of surveying professional journals for ads 
about surveying programs for the CoCo. I ran across 
packages for other popular home computers, but for the 
CoCo. offerings have been as scarce as hen's teeth. 

Survey Programs is on cassette for a 32K ECB CoCo. 
If you have a disk system, you'll have to unplug the 
controller. All graphics pages have to be cleared, and then 
this 28K plus program barely fits. The package allows the 
optional use of the TRS-80 TP-IO printer for hard copy. 
(I used it with my LP VII, and it seemed to work just fine.) 
Documentation consists of 28 loose 8'/2-by-l 1 pages and 
promises that after working through the included examples 
once, the instructions will no longer be needed. 1 agree: This 
program is so straightforward (a rarity in this field) 1 didn't 
need to refer to the instructions much, even the first time 
through. The documentation warned me about a high-speed 
poke (which my old gray beast won't take) in a certain line, 
but failed to warn me about the one in Line 1215. Once 1 
found and deleted that one, things went smoothly. 

Survey Programs stores up to 200 coordinate pairs (by 
point number) in high memory where they would be 
unaffected by a crash. 

When using the module entitled "Field Traverse," 
bearings or field/ deflection angles may be input. Angles are 
entered (for this and all other modules) in the usual 
DDD.MMSS format, with quadrants I through 4 for 
bearings. Distances input to this module may be corrected 
for slope or temperature. Side shots can also be input. There 
is an opportunity given to review data input and revise if 
necessary before calculation begins. After supplying the 
initial point number, subsequent point numbers are 
consecutively assigned automatically. It computes and 
stores latitudes and departures, which are not converted to 
coordinates until the traverse is balanced by compass or 
transit rule, at which lime an area is calculated. Certain 
traverse legs may be held and omitted from the balancing 
procedure if desired. 

A second traverse routine is available under the "Co- 
ordinate Geometry" module, accepting bearings and 
distances, and allowing user-assigned point numbers. This 
module also includes inverse, bearing-bearing, bearing- 
distance and distance-distance intersections, horizontal 
curve calculations, and coordinate transformation routines. 
Area computations are also available, including determina- 
tion of the location of a sliding or pivoting line to enclose 
a specified area. Point numbers and coordinate pairs 
generated by this and the previous module can be saved to 



tape (with a specified file name), loaded from tape, or 
printed. 

A third traverse routine is also available in the "Map 
Check" module. This one accepts bearings and distances, 
but no coordinate pairs are stored. Curved sides may be 
included by supplying chord bearing and distance, as well 
as radius. Balance by compass or transit rule is available, 
and area calculated. 

The final module is entitled "Miscellaneous Calcula- 
tions." Included here is an angle addition routine that sums 
positive or negative angles. The bearing calculation routine 
starts with a known bearing and converts a turned angle 
to the bearing of the subsequent course. A triangle solution 
routine is also available. Another routine converts the CoCo 
into a full-featured RPN scientific calculator. 

As you can see, Survey Programs offers quite a number 
of features. I spent more time familiarizing myself with this 
program than with any other I've reviewed, and yet there 
are some areas I've barely touched. With the exception of 
the neglected high-speed poke, I encountered no problems 
with program operation. It is easy to learn and does most 
everything needed in the areas covered. I do, however, have 
a "wish list" regarding this program. 

Although the automatic consecutive point numbering 
feature is handy, there are situations where it is limiting. 
Assume the user is going back to an existing traverse and 
wants to turn a field angle at point #103 and go a certain 
distance to establish the coordinates of a side shot point. 
Assume there is already a point #104 in the traverse. Since 
the field angle techniques are available only in the "Field 
Traverse" module, with its automatic point numbering 
feature, this operation would overwrite the coordinates of 
point #104. There is a way around this problem: Go to the 
"Miscellaneous Calculations" module and use the bearing 
calculation routine to determine the bearing of the course 
to the desired side shot point, then go to the "Co-ordinate 
Geometry" module (which allows user-assigned point 
numbers, but will not accept field angles) to establish the 
point. Unfortunately, this is a little inconvenient. 

Curves can only be included in a traverse by traversing 
along the chord (or through the radius point). It would be 
nice to just supply the delta, radius, and direction of 
curvature and traverse straight to the E.C. Once again this 
is not an impossible situation: There are ways around it 
using intersect techniques, etc. It's just an inconvenience. 

The hard copy obtained from the printer uses about a 
third of the page width at the left margin. Point numbers 
with bearings and distances are printed in a separate 
operation from point numbers with coordinates. While the 
printouts are logically arranged and readable, the format 
could be improved. 

My main wish is that Survey Programs be made available 
for a disk system. I believe the average user in the market 
targeted by a program like this would either already have 
a disk system, or be willing to upgrade to one. 

I hope I'm not coming across as too negative here: This 
is a fine piece of programming, and Mr. Jones is to be 
commended. I consider Survey Programs to be well worth 
the asking price and would recommend it to anyone wanting 
to use their CoCo in this field. 



(T. P. Jones, 2338 Ryder St., Ottawa, Ontario, Canada Kl H 
6X6; $119 U.S., S159CDN.) 
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Fourcube: A New Twist 
to an Old Game 



I'm sure just about everybody has at one time or another 
played Tic Tac Toe. A lot of you have probably even played 
Reversi or some other variation of the "four-in-a-row" type 
game. Most were pretty simple and couldn't hold your 
attention for very long. 

This latest version, Fourcube from Novasoft, will give 
you a lot more challenge for the money. Enough of a 
challenge to keep you interested long, long after those other 
games have been forgotten on the shelf. 

You start with four cubes, one on lop of the other. Each 
of those cubes has 16 squares within it. Your goal is to fill 
in four squares in a row. Sounds easy, but the computer is 
smarter than you think. You can accomplish your four in 
a row all within the same cube, or you can stagger them, 
one to a cube. Either way, you must think on four different 
levels at the same time to be able to outsmart the computer. 




••HUB- 
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There are six levels of play. Level one offers little or no 
resistance to your obvious moves. This is great for 
youngsters. Level six kept me at bay for quite some time. 
The game also offers you a choice of joystick or keyboard 
operation. It also offers the chance to either play against 
the computer or another human opponent. It even plays 
itself in the Demo mode so you can see all the possibilities 
of how to win. I liked the "rotate" operation. Using the left 
and right arrow keys, you can rotate all four cubes to get 
a different view of the playing field. 

Fourcube is witten completely in machine language so it's 
fast, fun and furious. I think you'll like this one. 

(Novasoft, P.O. Box 201, Ada, MI 49301; 616-676-8172, 
tape S15.95; disk $18.95) 

— Bill Bernico 
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Back copies of many issues of the 
rainbow are still available. 

All back issues sell for the single issue 
cover price. In addition, there is a $3.50 
charge for the first issue, plus 50 cents 
for each additional issue for postage and 
handling if sent by United Parcel Service. 
There is a $5 charge for the first issue, 
plusa$1 charge for each additional issue 
on orders sent by U.S. Mail. UPS will not 
deliver to a post office box or to another 
country. 

Issues July 1981 through June 1982 
are available on white paper in a reprint 
form. All others are in regular magazine 
form. VISA, MasterCard and American 
Express accepted. Kentucky residents 
please add 5 percent state sales tax. In 
order to hold down costs, we do not bill 
and no C.O.D. orders are accepted. 

Due to heavy demand, we suggest you 
orderthe back issues you want now while 
supplies last. 

To order, just fill out the form on the 
next page and mail it with your payment 
to: 

THE RAINBOW 

The Falsoft Building 
P.O. Box 385 
Prospect, KY 40059 
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BACK ISSUE ORDER FORM 










(See overleaf for instructions.) 










Payment must accompany back issue orders. We do not bill.) 








O Please send me the following back issues: 








NO. 


MONTH YEAR VOLUME 1 


PRICE 




1 


JULY '81 PREMIER ISSUE 


$2.00 


' 




2 


AUGUST '81 


$2.00 


: 




3 


SEPTEMBER "81 EDUCATION 


$2.00 


z 




4 


OCTOBER '81 PRINTER 


$2.00 


:: 




5 


NOVEMBER "81 


$2.00 


z 




6 


DECEMBER '81 HOLIDAY 


$2.00 


:: 




7 


JANUARY '82 


$2.00 


D 




8 


FEBRUARY '82 


$2.00 






9 


MARCH '82 


$2.50 


: .: 




10 


APRIL '82 


$2.50 






12 


JUNE '82 

VOLUME 2 


$2.50 






11 


JUNE '83 PRINTERS 


$2.95 


D 




12 


JULY '83 ANNIVERSARY 

VOLUME 3 


$2.95 






1 


AUGUST '83 GAMES 


$2.95 


D 




2 


SEPTEMBER '83 EDUCATION 


$2.95 


□ 




3 


OCTOBER '83 GRAPHICS 


$3.95 






5 


DECEMBER '83 HOLIDAY 


$3.95 


□ 




8 


MARCH '84 BUSINESS 


$3.95 


□ 




9 


APRIL '84 GAMING 


$3.95 


n 




10 


MAY '84 PRINTER 


$3.95 


D 




11 


JUNE '84 MUSIC 


$3.95 


D 




12 


JULY '84 ANNIVERSARY 

VOLUME 4 


$3.95 


D 




1 


AUGUST '84 GAMES 


$3.95 


D 




2 


SEPTEMBER '84 EDUCATION 


$3.95 


D 




3 


OCTOBER '84 GRAPHICS 


$3.95 







4 


NOVEMBER '84 DATA COMM 


$3.95 


D 




5 


DECEMBER '84 HOLIDAY 


$3.95 


D 




I 6 


JANUARY '85 BEGINNERS 


$3.95 


O 




J 7 


FEBRUARY '85 UTILITIES 


$3.95 


D 




■ 8 


MARCH '85 BUSINESS 


$3.95 


□ 


9 


APRIL '85 SIMULATIONS 


$3.95 


o 




i 10 


MAY '85 PRINTER 


$3.95 


a 




1 11 


JUNE '85 MUSIC 


$3.95 


a 




1 12 


JULY '85 ANNIVERSARY 

VOLUMES 


$3.95 


a 




' 1 


AUGUST '85 GAMES 


$3.95 


a 




! 2 


SEPTEMBER '85 EDUCATION 


$3.95 


a 




! 3 


OCTOBER '85 GRAPHICS 


$3.95 


a 




I 4 


NOVEMBER '85 DATA COMM. 


$3.95 


a 




! 6 


JANUARY '86 BEGINNERS 


$3.95 


a 




1 7 


FEBRUARY '86 UTILITIES 


$3.95 


□ 




1 8 


MARCH '86 BUSINESS 


$3.95 


D 




i 9 


APRIL '86 HOME HELP 


$3.95 


a 




1 ,0 


MAY '86 PRINTER 


$3.95 


□ 




i 11 


JUNE '86 MUSIC 


$3.95 


a 




! 12 


JULY '86 ANNIVERSARY 

VOLUME 6 


$3.95 


: 




! 1 


AUGUST '86 GAMES 


$3.95 


D 




! 2 


SEPTEMBER '86 EDUCATION 


$3.95 


□ 




i 3 


OCTOBER '86 GRAPHICS 


$3.95 


a 




! 4 


NOVEMBER '86 DATA COMM. 


$3.95 


D 




i 5 


DECEMBER '86 HOLIDAY 


$3.95 


□ 




! 6 


JANUARY '87 BEGINNERS 


$3.95 


□ 




i 7 


FEBRUARY '87 UTILITIES 


$3.95 


a 




1 8 


MARCH '87 BUSINESS 


$3.95 


a 




! 9 


APRIL '87 HOME HELP 


$3.95 


D 




i 10 


MAY '87 PRINTER 


$3.95 


□ 




i RAINBOW INDEX A complate index lo our first three years. July 1981 






| thro 


ugh June 1984. is printed in its entirety in our July 1984 issue. 






i Separately bound copies are also available$2.50 D 








' Note: Our Fourth and Filth Year Indexes, including RAINBOW ON TAPE 






J indexes, are included in the July 1985 and 1986 issues, respectively. 










TOTAL 










KY RESIDENTS ADD 5% 










IIC MAM fumfic 










SHIPPING & HANDLING 










II D Q rHABnp 










TOTAL AMOUNT 








t 


ENCLOSED 








j Name 








1 

1 iHriroct 








1 

1 Hity Rtnto 7IP 








i D 


Payment Enclosed, or charge to my: 








| □ VISA DMC D AE 








CARD** 








EXPIRATION DATE PHONF # 








RIRNATIIRF 








J To 


order by phone (credit card orders only) call (800) 847-0309, 8 a.m. 






i to 


5 p.m. EST All other incuiries call (502) 228-4492. 









Hardware Review! 



5» 



Extender Cable 
Offers Flexibility 



One of the first things I noticed when I unpacked my new 
CM-8 monitor was that the video cable that attaches to the 
CoCo 3 was only about 3 feet long. That's long enough if 
you plan to set your monitor right behind the CoCo 3 or 
on a stand or shelf just above it, but it's too short if you 
need to move it farther away. Enter the Spectrum CM-8 6- 
foot Extender Cable. 

This 6-foot cable from Spectrum Projects will allow you 
to move your CM-8 to most any place you like. I found 
this to be a big help for me because the large 1 3 inch CM- 
8 screen is too close for me and results in added eyestrain. 
Using the extender cable, 1 was able to move the monitor 
farther away, and now 1 don't have to wear my glasses while 
computing! 

The flat-ribbon cable is well-made, with a male connector 
on one end and a female connector on the other end. Since 
the cable is fiat instead of round, as on the CM-8, I had 
to roll the cable along its length to get it pushed down into 
the cable slot underneath the CoCo 3. But that was not a 
problem. 

Although I feel such a cable is handy for CM-8 users, I 
do not feel that the $20 price tag for an unshielded cable 
is reasonable. 

(Spectrum Projects, Inc., P.O. Box 264, Howard Beach, NY 
11414; 718-835-1344, S19.95 plus $3 S/H.) 

— David Gerald 



Two- Liner Contest Winner . . . 

This routine prints a chart for you to list your favorite 
BBS numbers. 

The listing: 

10 PRINT#-2,CHR$(27)"W":PRINT#-2 
, TAB (14) "BBS ID NUMBERS" : PRINT#- 
2 , STRING$ ( 40 , "=" ) : PRINT#-2 : PRINT 
#-2, TAB (0) "BBS NAME "TAB (14) "area 
PHONE No. "TAB (30) "ID NUMBER" : PR 
INT#-2 
20 FORX=1TO25:PRINT#-2,TAB(0) " . . 

"TAB(13)"( ) ...- 

"TAB(30)" ":PRINT#-2:NE 

XT X 

J. A. Carey 

Brooklyn, NY 



(For Ihis winning two-liner contest entry, the author has been sent copies of 
both The Second Rainbow Book of Simulations and its companion The Second 
Rainbow Simulations Tape.) 



140 



THE RAINBOW May 1987 



Software Review! 



It's a Bird; 

It's a Plane; 

It's Champion 



r^ 



is a finite amount and cannot be replenished, while 
endurance may be increased by hovering in flight. Once the 
strength is gone, the Champion dies and the game is over. 
Your strength is decreased by the amount of damage you 
sustain during attacks to rid a sector of its villains. While 
grounded, your on-board computer can provide a status of 
your current sector (taken or free), a list of what you have 
already recovered, and a complete map of the city. You can 
also attack a villain or return to flight. 



Stronger than a locomotive (not quite); able to leap tall 
buildings (maybe just fly around for a while); the Champion 
is here to save the city of Oakdale. Champion, a program 
from Mark Data Products, is an Adventure game written 
for a Color Computer with 64K and at least one disk drive. 
It comes with six pages of instructions, a disk and vinyl 
portfolio. This is more than sufficient to play the game. 

The Champion is a crusader endowed with special 
powers. He has taken it upon himself to rid the world of 
crime. However, his arch rival, Mr. Bigg, does not quite see 
it that way. Mr. Bigg, a criminal mastermind, plans to use 
his great powers to rule mankind. Using his influence, he 
has gathered a great army of villains and plans to take over 
the city of Oakdale. Mr. Bigg can take on any form and can 
easily hide among his army of villains. 

A government group. The Service, has developed a device 
that can detect Mr. Bigg. The only problem is that it has 
been stolen by a spy, disassembled into three parts, and been 
hidden somewhere in Oakdale. Meanwhile, your sources 
have discovered that Mr. Bigg has a gadget called a power 
drain, which he intends to use on you. It is also hidden 
somewhere in the city. If you can recover the gadget first, 
you may be able to destroy Mr. Bigg with his own weapon. 
At this point, the challenge begins. 

The game could be considered a variation of the classic 
Star Trek type game. The city is divided into sectors 
specified by a horizontal and vertical coordinate. This is 
displayed in the upper-left corner of the screen along with 
a small description of the location. The bottom-left is the 
command area where you use the joystick to control the 
activities of the Champion. The upper-right contains a 
section of the city map while the lower-right displays 
responses to your queries and displays actual combat 
sequences. 

Champion consists of two modes: flight and grounded. 
During flight, the Champion can fly above the city and is 
not restricted to following the roads because the villains are 
active and moving around, and the game clock is running. 
The difficulty level you choose to start the game determines 
the length of time before the villains attack the sectors. 
When the message Vi 1 lains on the Move is displayed, the 
city is being attacked. The villains are only interested in 
attacking the city and not the Champion. When in flight, 
you have access to your on-board computer, which can 
identify sectors containing villains but cannot identify the 
particular villains until you are grounded. 

Once grounded, you may attempt to search a sector for 
the missing detector pieces or the power drain; however, if 
there are v'mains present, you are not allowed to search the 
sector until they are destroyed. Here lies the real challenge. 
The Champion has strength and endurance. The strength 



"If you can recover the 
gadget first, you may 
be able to destroy Mr. 
Bigg with his own 
weapon. " 



There are actually four types of villains that you must 
contend with: agents, villains, raiders and Mr. Bigg. The 
agents are the weakest; Mr. Bigg is the strongest. Likewise, 
the agents are the easiest to kill and can cause the least 
damage to you, while raiders are the toughest and can really 
do some damage if they get hold of you. Naturally, it 
requires the power drain, to eliminate Mr. Bigg. Without 
the power drain your only weapons are the blast, punch, 
kick and dodge (you must move or you may also be blasted, 
punched or kicked). The blast uses the most endurance and 
the most time, while the punch uses the least. The dodge 
also uses some endurance. Sometimes you may have to hit 
and run. You must remember that villains increase their 
endurance while you are in flight. Choosing the retreat 
function costs you 100 points. 

Every lime the message Villains on the Move appears, 
the sectors are being attacked by Mr. Bigg's army. A sector 
begins with 15 strength points that decrease each time it is 
attacked. The number of points decreased is determined by 
the number and type of villains in the sector. An agent costs 
one point, a villain costs two, a raider costs three, and Mr. 
Bigg costs four. When the sector strength points reach zero 
that sector is "taken." When all sectors have been taken by 
the villains, the game ends, just as it does when your strength 
runs out. 

This is a fascinating game and a very difficult one to 
master. It takes a while just to be able to move the joystick 
quickly enough to outmaneuver the villains during an 
attack. Anyone enjoying the Star Trek type action games 
will get a blast (no pun intended) out of this one. Oakdale 
needs your help! Be a crusader. Be a true Champion. 



(Mark Data Products, 24001 Alicia Pkwy. #207, Mission 
Viejo, CA 92691; 714-768-1551, S27.95) 

— Larry Birkenfeld 
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Datapack II Plus (and III+) 
— Super Smart Terminals 



As terminal programs add capabilities, they often add 
such complexity that users are intimidated by the many 
available commands. 

The challenge for the software programmer is to provide 
the features and power of a smart terminal program with 
the simplicity of a ROM pack. 

One successful terminal program combining power and 
ease is Datapack II Plus Version 4.0 from Cer-Comp. As 
the name implies, Datapack II Plus is a full-featured 
terminal/ data communications program. It is the most fully 
featured communications program 1 have ever seen for the 
Color Computer. 

Datapack II Plus is an M6809 machine language program 
written for the Color Computer. Actually, eight versions of 
DPII+ are included on the disk. There are versions that 
support the Double Density and PBJ 80-column video 
boards as well as the Disto Super Controller with the 80- 
column card. Also included are versions to support either 
the standard RS-232 port or the deluxe RS-232 cartridge. 

DPII+ senses the maximum available memory in the 
computer and adjusts the buffer to take advantage of this 
storage capability. 

Even if you don't have an 80-column adapter, DPII+ has 
a high resolution command that sets the number of 
characters displayed per line on the high resolution screen. 
This can be varied from 28 to 255 characters. All screen 
widths above 64 characters per line are unreadable, but can 
be useful for seeing print formats on the display before 
printing a document. 

The list of DPII+ commands is extensive. However, the 
default settings of the program are the most commonly 
used. These options give you the flexibility to customize the 
program to meet your needs. 

A very useful tool has been included with DPII+ to assist 
the user in getting maximum application from the program. 
A communications programming language called Auto Log 
enables the user to have DPII+ automatically connect with 
a desired information source and position the requested 
terminal settings. 



POLICE OFFICERS and others 

If you are involved in the reconstruction of motor vehicle 
accidents or would like to learn, this program is a must. 
The program is extremely user friendly. It allows you to 
enter just your road measurements. The computer will 
give you the speed of each vehicle at the point of impact. 
Answers output to screen or printer. Complete in- 
structions for the beginner. This program is written for a 
64K COCO ECB disc. It is easily adaptable to other 
RADIO SHACK computers. Order RECON today. 
Price $39.95 Plus. $2.50 S&H MA Res. add 5% sales tax. 

Bytes Bits & Chips Computer Shop 
P.O. Box 42, Chicopee, MA 01014 



Auto Log files can be saved either to disk or tape and 
used any time you are in the terminal mode. All the 
functions and commands of DPII+ can be used in an 
autolog file. You can use them for uploading, downloading, 
logging off a system or whatever you like; it depends on your 
imagination. Auto Log gives you the power of DPII+ in an 
easy-to-use operating shell. 

DPII+ also gives you the capability of emulating a VT 
100 terminal. While this will be of limited interest to most 
CoCo users, if their company's mainframe is a Digital VAX, 
and their employer has sufficient foresight to allow 
employees to log onto the computer from a remote terminal, 
this feature will be appreciated. The PF-X commands used 
in the VAX MASS-1 1 word processing program are a pain 
on the Color Computer's keyboard, requiring holding three 
keys simultaneously. Considering the differences in the 
number of keys between a CoCo and VT100, it's amazing 
the Color Computer has any emulation capability. 

Overall, I found Datapack II Plus an excellent commu- 
nications program. Its capabilities are unexcelled, and this 
power is usable as logical command codes are used to 
control these features. A 50-plus page user's manual is 
included. This manual will walk a new user through the 
program's features. Auto Log files, once set-up, allow the 
user to rapidly log onto information sources and discover 
what awaits them on the other side of the phone line. 



— Bruce Rothermel 



A Look al Datapack 111 + 



As smart terminals, both versions of Datapack are 
essentially the same. While Datapack II Plus requires the 
use of add-on cards (PBJ or Disto 80-column card, RS-232 
pack and multipack) to fulfill its full potential, Datapack 
111+ takes advantage of the new features found on the CoCo 
3 to achieve the same performance with far less clutter. 
While support of 80-column cards has been discontinued 
with the new III+, full support for the CoCo 3 is provided. 
All palette options are available for a customized RGB 
display. Screen widths from 32 to 80 columns are supported, 
as well as a monochrome display option. 

A general rundown of the program configuration reveals 
that it supports xon/xoff, with user-definable download 
characters. A control character trap and filter are also 
provided and, again, are user definable. Xmodem upload 
and download are fully supported with a status display of 
the Xmodem process as it is implemented. All communi- 
cation parameters may be easily set, or programmed into 
a custom AUTOEXEC file that will automatically configure 
the program with up to 12 different parameters, such as 
terminal and printer baud rates, data bits, etc. A general 
status screen is the default display in the command mode. 
This screen displays all of the current terminal settings, as 
well as the memory status of the PK and terminal buffers. 
What's a PK buffer? 

Most smart terminal programs allow the use of several 
user-definable keys to send short strings, usually as an 
adjunct to the log-on procedure. Datapack provides for nine 
such keys, but there is a major difference in the w^ \hese 
buffers may be utilized. Each programmable key (PK) may 
contain any amount of information up to the total amount 
of memory available, i.e., one key may be programmed to 
contain up to 49K of information! A PK buffer may be 
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printed, saved to disk, contain a Datapath command string, 
or be transmitted to a host computer. The PK. buffers may 
be programmed to issue commands within Datapack and 
stored on disk. When recalled, either by the program 
(AUTOEXEC), or the user, an automated terminal configu- 
ration and log on (AUTOPILOT) is quickly and accurately 
accomplished. 

Datapack is configured with an adequate text editor. Full 
line edit capabilities are provided, along with a 10 line jump 
command. However, the lack of buffer navigation aids, such 
as mark, find or search, limit the program in manipulating 
large blocks of text. As Datapack handles standard ASCII 
files, such operations may be performed offline with any 
compatible word processor. 

While a complete memory status update is always 
available, it is not displayed or windowed in the terminal 
mode. As such, a buffer overflow is possible. Online, 
Datapack will retain the most current information, up to 
49K. When the buffer is full, wrap-around occurs on a first- 
in, first-out basis. 

Xmodem implementation is extremely smooth, support- 
ing direct to disk send and receive operations. Options are 
provided for both binary and ASCII formats, with a 
complete onscreen display of the Xmodem file transfer 
status. 

While there have been several reports that Datapack II 
Plus will sometimes drop characters right after a carriage 
return, if a fast typist is using it (and more likely in Hi-Res 
mode), the ///+ program has an improved keyboard handler 
that should make this serious problem unlikely to occur. 

While it was not tested, Datapack III+ is said to run at 
2400 baud through the bit banger port! Certainly, that is 
a singular accomplishment in good programming and a very 
desirable feature. 

Datapack is heavily and cleverly copy-protected. As a 
purchaser, you will have to rely on Cer-Comp for backup 
support, as the distribution disk may not be backed up or 
cloned by any conventional procedure. The original disk 
may be "refreshed" with a modified, non-functional backup, 
but no other user maintenance is possible. Datapack is 
supplied as a doubled-sided disk with a complete copy of 
the program on each side. Minimum system requirements 
are 32K with at least one disk drive. 

Once Datapack is configured and running, it is an 
extremely user-friendly package. The documentation is 
excellent, providing a full description of each command as 
well as sample AUTOEXEC, AUTOLOG and AUTOPILOT 
sequences. One rather useful utility has been omitted from 
the current manual. Datapack looks for a file of the type 
AUTOEXEC . DAT in Drive when the program is first booted. 
With a two-drive system, the distribution disk may be 
installed in Drive 1, with a short BASIC loader and a custom 
AUTOEXEC file stored in Drive 0. The files in Drive may 
then be used to boot customized versions of Datapack for 
each BBS or information service that the user employs. 

The error trapping within Datapack is superb. There is 
an onscreen menu of all available commands, along with 
prompts as to the type of information each command 
requires. If an incorrect command is issued, the user is so 
notified, and prompted for another value. The only "fatal" 
error that may occur is with the reset switch which is not 
disabled and will reset your machine, resulting in the loss 
of any data currently in the terminal buffer. 

VT52/100 emulation is one feature that is unique to 
Datapack. To be sure, it is not required on any system that 



is currently running, but it is almost universally supported 
by all the major information networks. With an 80-column 
screen, VT- 100 emulation provides for a very pleasing screen 
refresh. Additionally, many services support online screen 
editing via VT52/100 control codes. As the VT52/100 
protocol is extremely long, complete implementation is 
impossible with the CoCo. Datapack supports auxiliary 
keypad sequences, 0-9, as well as PF 1-4. Status and cursor 
position reports, control codes to enable/ disable line feed- 
new line, cursor key modes and ANSI/VT52 are also 
supported. All other DEC VT set/ reset modes are ignored. 

With the use of VT-100 emulation, many private main- 
frame systems may be contacted. While this later capability 
is almost exclusively the province of private industry, it is 
an extremely attractive option for those who can take 
advantage of such a capability. The documentation 
provided with Datapack assumes that the user is familiar 
with the DEC VT protocol. If this is not the case, a copy 
of the DEC VT52/ 100 manual will provide a useful, perhaps 
necessary, adjunct to this diverse capability. 

If your interest in telecommunications is in the area of 
data retrieval, forum communications, or program down- 
loading, it will be quite difficult to find any program that 
out-performs Datapack. While I have pointed out some 
flaws, I haven't used any CoCo terminal program that 
comes close to the overall performance of Datapack. 

(Cer-Comp, 5566 Ricochet Ave., Las Vegas, N V 891 10; 702- 
452-0632, $59.95) 

— Henry H. Holzgrefe 



ADOS 



ENHANCED, EPROM-ABLE 
DISK BASIC 



Now you can supercharge Basic with an impressive array ol e«lra features 
WITHOUT sacrificing compatibility 1 ADOS is compatible with virtually tOO's of 
commercial software Customizing utilities are provided to allow user-delmed 
command abbreviations. Daud rate, step 'ate tracks per disk (35 or 40) Support ol 
double sided drives ana more Alter customizing ADOS you can nave it burned into 
an EPROM that plugs m\o ihe Disk Basic ROM socket, or |ust use it in BAM as a 64K 
disk utility lEPROM • burning will cost about S?0 -we provide information 
concerning how you can have Ihis done I Features include • repeat and edit ol Ihe 
last direct-mode command • 26 definable conhol key a bore via l ions ■ auiomahc line 
numbe' prompts " OOScommand • lowercase commanc entry la line complement to 
a Lowerkil m PBJ Worjjpakl * COPY tlilenamei to (drive number) ■ AE error override 
option • RAM command |64K> • RUNM command • text echoing lo punter • ML 
monitor • teil hie scan • enhanced directory • error (rapping • hires tent utility 
included i42. 5» or 64 characters per linei 

■I COULD NOT FIND ANY SOFTWARE THA T WOULD NOT RUN UNDER ADOS." 

THE RAINBOW. December 1984 
■/ LOVE ADOSI . . A GENUINELY FIRST RATE PRODUCT.- 

ColOf Micro Journal. February 19B5 
I WONT PART WITH MY ADOS EPROM FOR ANYTHING . NO COMPATIBILITY 
PROBLEMS - 

Hot CoCo.Mfly 1985 
Disk $27 « 



THE PEEPER 



ML PROGRAM TRACER 



Monitor machine language programs AS TMEY ARE RUNNING* Peepor actually 
limesna'e* with tne target program gmng FULL CONTROL as ML programs run 
Switch instantly between watching regular program output ana Peeper tt trace ol 
regisle'3 and Slack on screen o' printer Inspect memory in any ol 26 display modes 
Enecut'On speed can be varied from lull speed to the barest ciawl or nailed entirely. 
as programs run Smgleslepping. Oieakoomis memory or register etarnine'cnangc 
Relocatable supports 6-*K use 06K reaui'edl See February 85 review 
Disk $23.95 Assembler source listing Add 3.00 

NEW FOR COC03 

CUSTOM CABLE FOR MAGNAVOX RGB MONITORS 

The Magnavox 8CM515 and BCM505 monitors, containing RGBA. RGBI, and audio 
inputs, sell at prices comparable lo Tandy's CM-B. and represent a tar bettor buy 
tor CoCo 3 users Composite input, whicn CM-8 tacks. Is requited (or seeing PMOOE 
4 displays in color RGBI allows the Magnavox. unlike the CM-8, to be used with 
PC-Compattblos — a big resale consideration. i _ ( Cable 19.95 



SPECTROSYSTEMS, 



No delay on personal checks 

Please add $2.00 shipping Sorry no credit cards or CODs 



11111 N Kendall Drive. 
Suite A 108 
Miami. Florida 33176 
(305) 2743899 Bayw 
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Disto Super RAM 3: 
Quick and Simple 



History Comes to Life With 
Educational Software 



The Disto 512K upgrade is the smallest I've seen so far. 
The double-sided glass epoxy circuit board measures 2% by 
2 7 / 8 inches and contains 16 socketed NEC 41256 120 ns 
DRAMS. Two rows of header pins extend from the bottom 
of the board and plug in to matching sockets on the CoCo 
3 board. 

Installation instructions supplied with the board consist 
ol' five steps. After taking appropriate grounding precau- 
tions, the four 128K RAM chips IC16, ICI7, IC18 and 1CI9 
are removed. Two small capacitors, C65 and C66, are 
clipped with small wire cutters and removed. The new board 
is then plugged into the two white header sockets on the 
CoCo 3 board. That's all there is to it. In 20 minutes or so, 
you will have completed the job. 

"In 20 minutes or so, you 
will have completed the 
job." 

This upgrade has the memory chips facing up to facilitate 
better ventilation. It also does not use a ground plane. In 
RFI (Radio Frequency Interference) comparisons on my 
short wave equipment, 1 could not hear any interference. 
An interesting addition to the Disto upgrade is the use of 
a thin sheet of anti-static foam on the underside of the 
board. This prevents any accidental electrical contact 
between the bottom connections and components on the 
CoCo 3 board. 

Also included with the Disto upgrade is a disk that 
contains two very useful programs. The disk is not copy- 
protected so backup copies for your own use and protection 
are advisable. A 512K memory test program is useful to 
check out your new board and a utility to create 1 or 2 RAM 
disks and a printer spooler is also provided. The spooler 
has a handy feature if you have Disto PPR1NT capability. 
With this feature, you can use the parallel printer port with 
the Disto printer adapter. Installing the RAM disk and 
spooler utilities is easy to do, and a one-page instruction 
sheet is provided. 

Disto Super RAM 3 offers a great bargain and will 
provide some excellent uses for your CoCo 3's expanded 
memory capability. 

(C.R.C. Computers Inc., 10802 Lajeunesse, Montreal, 
Quebec, Canada H3L 2E8; 514-383-5293, price available on 
request. The software is also available from Spectrum 
Projects, P.O. Box 264, Howard Beach, NY 11414; 718-835- 
1344, for S24.95 plus $3 S/H) 

— Jerry Semones 



How would you like to travel across the Atlantic Ocean 
with Christopher Columbus in search of a new passage to 
India? Or look for the Fountain of Youth with Ponce de 
Leon? How about a trip to the moon with Neil Armstrong? 

You can experience these and many other events from the 
history of our country with software available from 
Compass Education. The American History package 
contains the history of the United States from the time of 
its discovery by Christopher Columbus to the day Neil 
Armstrong landed on the moon. 

Lesson plans one through eight deal with the discovery 
of America, the Colonial period, the American Revolution, 
the Constitution and the War Between the States. Lesson 
plans nine through 1 6 deal with settling the West, World War 
I, World War II and how we reached the moon. 

Each lesson is presented in an audiovisual manner. This 
is an excellent way to learn; while you are seeing the material 
presented on the screen, you are hearing about it. 

These programs are in a logical and well-presented 
format. At the end of each lesson, a scoreboard shows the 
number of questions asked, the number answered right on 
the first try and the number of wrong answers. 

This is the final study course in the educational software 
package I've been reviewing for the past five months. All 
five have met my criteria for valuable educational software: 
They're user-friendly, provide varying levels of difficulty, 
and include review capability and positive reinforcement. 
All the programs have been entertaining and educational. 
1 would not hesitate to recommend them. 

(York 10 Software, 9525 Vassar Avenue, Chatsworth, CA 
91311; 818-700-0330. Two-volume set $49.95 plus $3 S/H) 

— John H. Appel 



Two-Liner Contest Winner . . . 

This subroutine shows you how to prevent a lockup 
because your printer wasn't online or turned on. 

The listing: 

10 CLS:A=PEEK(65314) :B=INT(A/2) : 
C=A/2 : IFC-B=0THENPRINT" PRINTER O 
N"ELSEPRINT"PRINTER OFF" 
2j3 IFC-B=^)THENPRINT#-2 / l, THIS CAN 
BE A PROGRAM PRINT STATEMENT. "E 
LSEPRINT"TURN PRINTER ON" 

Jim Knoppow 
Kent, WA 

(For this winning two-liner conlesl entry, the author has been sent copies of 
both The Second Rainbow Book of Simulations and its companion The Second 
Rainbow Simulations Tape.) 
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Fantasy Clip Art Disk 

Gnomes « elves, dragons and more* 
plore than thirty clips for Cog .oma x ■ • ■ 
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ALL NEW ! ! ! 
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tow must have 
Cocomax ■ 

b-tK EXE disk $14.95 
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Oriental Gallery I 

Twenty new full -screen pictures from o. 
talented graphic artist* ••all ready to 
print or use with uour graphic editor- 

ALL HEW " ' 




EXB Disk 
Only S3 ••as 
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A GUIDE TO COCO 3 BASIC AND GRAPHICS 

Do you want to learn more about your 
Color Computer 3? If so, A Guid e to Coco 
3 Basic and Graphics is what you need! 

This practical guide to the Coco 3 is 
written by l.inda Nielsen, a long time 
Coco user. It has more than 50 pages of 
examples, explanations, and programs 
especially for the Coco 3. 

Not only that, the Guide includes a 
disk of programs and pictures. Translate 
low res graphics onto the high resolution 
screen. Draw on the 320 by 192, 16 color 
or the 640 by 192, 4 color screens. 
Learn how to display 256 artifacted 
colors on a television or composite 
monitor . 

Unlock the power in your Color Computer 
3, order your GUIDE today! 
Price effective March 1 $21.95 
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BETTER GRAPHICS ON 
YOUR COCO 3 

Use the graphic power 

of your Coco 3! More 

good information and 

examples of high res 

graphics on the Coco 

Create better static 

illustrations. Learn 

more about Basic 

animation, screen 

scrolling, tips on 

HPUT and HGET, how to 

use HDRAW and much more. Better Graphics on your Coco 

3 plus two disks of programs and pictures. $24.95. 



OKIMATE 20 WITH PLUG 'N 'PRINT 

Small, quiet and colorful! Eight vivid colors. 
Excellent print quality. Italics, super and sub 
scripts. Ten, twelve or fifteen characters to the 
inch. The perfect second printer for your Coco. 

Printer, Plug 'n 'Print, paper, black and color ribbons, 
instruction and software. $240 plus $10 shipping. 



GRAPHIC SCREEN DUMP FOR THE OKIMATE 20 

Dump PMODE 3 and PMODE 4 graphics from your Color 
Computer to the Okimate 20 printer. Select 2 color, 4 
color or black and white screen dumps. $29.95 



DOUBLE DRIVER II 

Finally a monitor driver for 
the Color Computer II that 
lets you use a monochrome 
and a color monitor 
simultaneously. We're proud 
of this new driver. The six 
transister circuit provides op- 
timal signal mixing and signal 
gain. Excellent monochrome 
output and better quality 
resolution in the color ouput 




than any driver we have 
seen. Audio output also. Fits 
all models of the Color Com- 
puter II. $29.95. 




THE COCO-SWITCHER 

A QUALITY PIECE OF HARDWARE 

The CoCo Switcher allows you lo hook up 
ihree peripherals to your RS-232 jack. Con- 
nect your modem, printer and any other 
RS-232 compatible peripheral to the CoCo 
Switcher. An LED on the CoCo Switcher 
shows if your computer is on or off at a glance. 
The LED flickers when transmitting or receiv- 
ing data. 
$39.95 plus $2 00 shipping and handling 



DOUBLE DRIVER I 

The BEST monitor driver available. 
Color composite, monochrome and 
audio output. For original CoCo D. E 
and F boards. $24.95. 

MONO II 

Mono II for Color Computer 2. An 
excellent monochrome monitor driver 
that has audio output also. Specify 
model needed. 

$24.95. 




ETON BAY SOFTWARE 

A Division of Moreton Buy laboratory 

316 CASTILLO STREET 

SANTA BARBARA 

CALIFORNIA 93101 

(805) 962-3127 

Ordering information 
Send $2.00 shipping and handling per order We ship 
within 1 working day on receipt of order. Blue Label 
Service available. California residents add b% sales tax. 
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Capitalize on Your 
State Knowledge With 
State the Facts Game 



Quick, what is the capital of Nebraska? If you didn't 
answer Lincoln, you might benefit from a new program 
titled Slate the Fails Game. Stale the Facts is a drill and 
practice exercise on the 50 states and their capitals. A Hi- 
Res map of the United States is drawn on the screen. Next, 
stales are picked at random and highlighted on the map for 
the player to identify. The player gets three chances to 
identify the state and then is asked to identify its capital. 

There are three game options available: 1) Identifying 
states and capitals with optional stale data, 2) Identifying 
states and capitals without the state data, and 3) Viewing 
the state data files only. The feature that sets this state 
identification program apart from others is the optional 
database. When choosing this feature, you can get further 
information about the state's geography, history, popula- 
tion, etc. This makes it a more valuable learning tool, 
because the user can browse through individual state 
information in addition to doing memory practice on states 
and capitals. The files are written in ASCII on the disk. Data 
in these files could easily be added to or modified by loading 
them into most word processors and then resaving them. 




mm 




."• :* ~i r i -ah f = j 
C ftp 1 1 I = f i gh ' = 3 



iiiiiiiiiihiiiiiiiiiiiiiiiiiiiiiiiiiiiiniiiiniiiiMlwii 
States ■■■' :•' ; = I 
Cop ito Is •■•' :•' '-= ~ 



What Is 'he none oi this state 



The program keeps a running total of correct and 
incorrect responses on both identification of states and 
capitals. High and low pitched tones signal the correct and 
incorrect answers, respectively. Spelling is important for the 
responses, since incorrect spelling counts as a wrong answer. 
In general, all words should be spelled out, rather than 
abbreviated (West Virginia instead of W Virginia). 

Documentation consists of one small sheet of paper that 
includes loading instructions and general information about 
the program. However, I don't consider this to be a 
drawback. The majority of the needed instructions are 
located on the main menu screen. Actually, programs with 
straightforward directions should include them within the 
program for the user's convenience. 



There were two features missing that would make State 
the Facts Game more effective. The program, because of 
its random picks, does not repeat missed states or make an 
attempt to keep from duplicating states that were already 
answered correctly. A visual message as well as the tone 
could also be added for correct responses as another form 
of positive reinforcement. 

The program requires a disk drive and 64K of memory. 
It works perfectly on the CoCo 2 and 3, but locked up on 
the CoCo I after getting past the main menu. Another 
somewhat annoying glitch was in the data files section. The 
directions say to type MENU or QUIT to move out of a section, 
but this didn't work. I found out by accident that if you 
choose state 51, it returns to the main menu. This is not 
clearly documented in the program. The Hi-Res map is 
generally good, but the New England states are cramped. 
Some of them are hard to distinguish by shape and could 
only be identified by their relative positions. 

As an instructional tool, I'd suggest you use the data files 
section first to view the states and their corresponding 
capitals. A blank U.S. map with the states outlined would 
help with the identification of the New England states and 
would serve as a manual score card to mark states known 
and unknown. Playing the game with or without the 
optional database would then provide a review or post-test 
to check on your state fact knowledge. A classroom teacher 
might set up a class challenge or competition based on the 
results of each round. 

On a scale of I to 10, I'd rate it an 8, primarily because 
I was impressed with the state data file and its reasonable 
price. As far as the few glitches in the program and the issue 
of CoCo 1 compatibility, 1 was a bit disappointed. I 
contacted Mikaron, and they assured me that fixes for these 
would appear on all future disks shipped. 

(Mikaron Software Co., P.O. Box 1064, Chester. CA 96020; 
$22.95 plus $.50 S/H) 

— Mark Haverstock 



One- Liner Contest Winner . . . 

Use this program to print any information on 
standard 3'/2-inch by 1-inch labels. 

The listing: 



p CLS: PRINT" SET LABELS" : L=9 6 : FOR 
I=j3T05 : PRINT@L+40 , "<" : PRINT@L, " " 
; :LINEINPUTA$ (I) : L=L+64 : IFA$ (I) < 
> ,lll ANDK4THENNEXTELSEINPUT"OK";A 
$:PRINT#-2,CHR$ ( (I<3) *-lj3) ; : FORK 
=1T0999 : FORJ=pT05 : PRINT#-2 , STRIN 
G$( (2 8-LEN(A$(J) ) )/2 , 32) A$ (J) :NE 
XT : INPUT "AGAIN" ; A$ : NEXT 



Jim McDowell 
Burlington. VT 



(hot this winning one-liner contest cniry. the author has been sent copies of 
both The Second Rainbow Book of Simulations and its companion The Second 
Rainbow Simulations Tape.) 
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Sigmaword: Instructive Word 
Processor for Beginners 



Every CoCo beginner soon starts to search for a word 
processing program. Why not start with a simple, inexpen- 
sive one? After using it for awhile, it will be easier to know 
just what your requirements are for a word processor. 
Sigmaword is a good starter program that will permit you 
to refine your requirements. You can learn a lot about word 
processing from Sigmaword. 

When the program is entered, questions are asked with 
reference to presentation on the monitor screen. You may 
select black letters on a while background or white letters 
on a black background. I prefer black letters on a white 
background, but the choice is there for you to make. 

After the background and letter color choices are made 
and entered, a word-counting bar is printed across the 
bottom of the monitor. Because of the details one must keep 
in mind to preserve the accuracy of the word-count system, 
I did not find this feature useful. But, it is not in the way 
and is easy to ignore. 

The main menu, only accessible from the Command 
mode (the program automatically opens in Command 
mode), is reached by pressing the BREAK key. This menu 
includes New file. Display/edit/ add, Display with justifi- 
cation. Print, Directory, Save file. Load file, and Setup. Free 
memory on disk is also printed. 

After the program has been entered and the color of 
printing and background selected, the program is automat- 
ically in the Command mode, ready for you to enter 
whatever you want from the keyboard. This is the same as 
if you had called for the main menu and selected either New 
file (N) or Display/ edit/ add (D). 

If you select "D" and the Edit mode, the up and down 
arrows permit moving the cursor to the point where you 
want to insert, delete or make changes. Although the Edit 
function works, I found it to be awkward and time- 
consuming. 

In the Edit mode the cursor may be moved, using arrows, 
to the point in the document where corrections, deletions 
or additions are to be made. To insert, the "1" is pressed. 



and the material to be inserted is typed in, or deletions made. 
If the position of these changes is made in more than a few 
lines from the end of the document, the process of making 
the changes and getting back to the place in the document 
from which you entered the Edit mode is so time-consuming 
that you may decide that it is better to erase and start all 
over again. There are no provisions for block or word copy 
or move, headers or footers, page numbering, global or any 
other search, setting of tabs and many other things found 
in more expensive programs. 



"You can learn a lot 
about word processing 
from Sigmaword. " 



When in Command mode, the down arrow becomes a 
REPEAT key. Since the left arrow erases whatever is 
immediately to its left, the combination of down arrow and 
left arrow permits rapid erasing. The main menu can only 
be reached from Command mode. 

The Print facility provides underlining, font changes, and 
anything else for which you can find a CHRS code. This is 
done by entering the proper CHRS code (preceded by right 
arrow and followed by another right arrow). 

The instructions accompanying this program are not the 
highest order and should be rewritten. They can be 
followed, but it isn't easy! This program does work, and the 
price is low. Try it, you may like it! It is certain that you 
will learn from it. For an error-free typist who has no 
requirement to do much editing, Sigmaword would be an 
adequate word processing program. 

(Sigma Software, 14025 152nd Ave. S.E., Renton, WA 
98056; S9.95) 



— Charles L. Redman, Jr. 



CoCo's Best & 
Fastest Spreadsheet 
RS-DOS Version 



DYNACALC® is a registered 

trademark of 

Computer Systems Center 



DYNACALC 

retail... $ 99.95 ^tf^H 




Compatible with 
CoCo1,2&3 

64 K Required 



DERRINGER SOFTWARE, INC. 

P.O. Box 5300 
Florence, SC 29502-5300 



To place an order by phone, call (803) 665-5676 

10AM-5PMEDT 

Check, Money Order, VISA, or MasterCard 

South Carolina residents add sales tax 

Include $3.00 for UPS Shipping - $5.00 U.S. Mail - $9.00 Air Mail 
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OS-9 Level II: Versatility, 
Power and Low Price 

By Dale L. Puckett 

We'll start our review of OS-9 Level 11 by highlighting 
some of the differences between this package and Level I. 
To find the differences, 1 set up a pipeline using a single- 
line public domain directory listing utility and a third-party 
sort program to put OS-9's multitasking to work. Why 
should I work to find the differences when 1 have a powerful 
operating system at my finger tips? The command line 
looked like this: 

DS9: Is /d0/cmds ! qsort>/p 

When OS-9 finished running this command, 1 had a hard 
copy of all the utility commands available on the OS-9 Level 
11 system disk. The names of the utilities were listed in 
alphabetical order, with one name on each line. Next, I 
issued the same command on the OS-9 Level I, Version 
2.00.00 system disk. I then taped the two listings side by 
side and noted the differences. 

When I compared the two printed listings. 1 noticed that 
asm, binex, debug, dump, exbin, grfo, login, pr interr, 
save, sleep, tee, tsmon and verify were missing from 
the Level II system disk. 

At the same time, I noticed that the CMDS directory on 
the new Level II system disk contained deiniz, error, 
grf drv, modpa tch, montype and ucrea te. By comparing 
the two lists, we can learn a lot about the design and 
marketing philosophy of OS-9 Level II. Don't fret; it's good 
news! 

Most of the utilities missing from the list are those used 
by assembly language programmers. Tandy wisely decided 
that the average Color Computer owner starting to use OS- 
9 is probably not an assembly language programmer. They 
pulled the assembler and debugger out of the OS-9 Level 
II release and made a very smart substitute. When you buy 
OS-9, you now receive BAS1C09 with the package — a good 
move, since most Color Computer owners arc familiar with 
BASIC programming. 

This philosophical change also means the DEFS directory 
is not needed on the Level 11 system disk. Assembly 
language programmers will receive the files in the DEFS 
directory when they purchase the new developers pack. This 
addition to the OS-9 product line will include a screen editor 
and a relocatable macro assembler, as well as a number of 
additional device drivers and descriptors. 

Because of OS-9's versatility, beginners can set up their 
system disks to run BASIC09 immediately after they start up 
their Color Computer. This places them in a familiar 
environment and should remove much of the panic that 
overwhelms many OS-9 newcomers. 

To set up your system disk, move a copy of BASIC09 and 
RunB to the CMDS directory on your system disk. Rename 
the copy of BASIC09. Call it fiutoEx. Now restart your 
computer and watch what happens. Don't blink or you 
won't notice what happened. As soon as OS-9 finishes 
running the last command in your start-up procedure file, 
it runs flutoEx and vou will see the familiar BASIC09 



billboard. Of course, if you want to go to work with your 
text editor, you could change the names TsEdi t, DynaStar 
or Stylograph ... to flutoEx. A fantastic idea! 

GFX2, the high resolution graphics package that comes 
with BASIC09, will literally knock your socks off. With it, 
you will be able to write object-oriented drawing programs 
that spit out graphics quality that no bit map-based 
program can touch. 

With high level BASIC09 run commands, you can select 
from 64 colors available in four 16 color palettes. You can 
set the border color and create colored patterns and new 
cursors. You can use logic functions to mix colors and use 
automatic scaling to draw outlines or filled boxes. You can 
draw ellipses and arcs and fill your objects with the color 
of your choice. You can get and put sections of your graphics 
screen to create animation effects, and select your own font. 
Letters can be boldface, proportionally spaced, transparent 
or underlined. 

Brfdrv lias the same function, albeit many times the 
power, as grfo. so there is little change. Because of the basic 
design of Level II, a printerr utility is not available on 
any Level II system. However, one third-party software 
developer sells one. Tandy's version of Level II solves this 
problem by giving you the ability to receive an English 
language error message by typing the command error 
followed by the error number in question. 

The missing login and tsmon utilities may be a serious 
problem for a few users. Again, I'm sure the fact they are 
missing revolves around the Color Computer OS-9 design 
philosophy. "With the rich windowing environment, why 
would anyone want to use an external terminal?" That's a 
very valid question, and it says a lot. Besides, the addition 
of an immortal shell concept to the package accomplishes 
the same thing — almost. 

On the other hand, the addition of the modpa tch utility 
can only be heralded as a terrific idea. It's an excellent tool 
that would have been nice to have a long time ago. You use 
it to patch and correct the CRC of a module in memory. 
After you run it, you can use the cobbler utility to put the 
changes in your 059Boot file. 

Another slick addition is a new device descriptor named 
/dd — for default device. Tandy utilities that have a unique 
pathlist hard-coded use this device. For example, the error 
utility reads its English language error messages from 'dd-' 
sys'errmsg. 

The 'dd device descriptor is nothing more than a copy 
of the device descriptor you want to use as your default 
device -- with its name changed. For example, if you 
routinely copy SYS directory files into a RAM disk named 
T0 when you boot your system, you may want this RAM 
disk to be your default device. To make t0 the default 
device, you need only make an extra copy of the module 
named rQ> and change its name to dd using modpa tch or 
another verifying patch utility. People who own hard disk 
drives will want to make a copy of their 'h0 device 
descriptor and rename it to 'dd. 

This addition means programmers who must hard-code 
a pathlist into a program can standardize on the device 
name 'dd as their default. If this is done, everyone will be 
able to run their programs, without worrying about using 
the same device name as the programmer. Another step 
toward ease of use has been made through this standardi- 
zation. 
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Another welcome addition to OS-9 Level II is an online 
help utility. If you forget how to run a particular utility 
command, you can simply type help followed by the name 
of the command to receive a detailed message. This message 
describes the proper syntax for the command. The utility 
lists its messages from a text file with a pathlist of /dd-'sys'' 
heipmsg. 

When you boot OS-9 Level II and use the mdir command 
to take a look at the modules in memory the first time, you'll 
notice that the following frequently used OS-9 utility 
commands are always in memory: copy, date, deiniz, 
del, dir, display, echo, iniz, link, list, load, mdir, 
merge, mfree, procs, rename, setime, tmode and 
unl ink. 

Having these commands available instantly, with no disk 
access required, is very convenient. It saves a lot of lime 
and is also very memory-efficient. The shell command, 
which must always be resident, and all of these utility 
commands fit in one 8K block of memory. The Color 
Computer's GIME chip switches memory in 8K blocks. 
Since the she 1 1 command has to be in memory all the time, 
Tandy's designers decided to use the remainder of the 8K 
block used by the shell — a very smart move indeed! 

There are few things, if any, you could do with Level I 
that you can't do with OS-9 Level II. The use of an external 
terminal is one of the only question marks because tsmon 
and login are missing from the Level II release. But, I'm 
pretty sure you can use another terminal by simply running 
a shell and redirecting the input, output and error output 
paths to 'T2. Yep — it works! I typed: 

059: iniz 'K.2 

0S9: shell 0»/t2& 

The device 'T2 was set at its default value of 9600 baud. 
I hooked up a cable to my Macintosh and called up Red 
Ryder. At 9600 baud, no parity and one stop bit, the 
directory and file listings from the Color Computer hard 
disk flew by on the black and white Mac screen. The only 
thing missing is the ability to use tsmon to login as another 
user from another terminal. I'll work on that. 

When you move up from Level I to Level II, the number 
of options available is increased. For example, with this 
version of OS-9, if you own a double-sided drive or an 80- 
track drive, you can use it without buying additional third- 
party software drivers. You run the conf ig utility to create 
a new 0S9Boot file, using the device descriptor modules 
supplied in the NODULES directory on the Config disk that 
comes with Level II. Unfortunately, device descriptors set 
to a stepping rate of six milliseconds are not supplied. 
However, since the descriptors follow the OS-9 standard, 
you can patch them with modpatch as we reported in the 
April issue of "KISSable OS-9." 

When you stop and think, you quickly realize why Tandy 
left the tsmon and login utilities out of this package. With 
all those windows and the new immortal shell feature, why 
would you ever need another terminal? 1 can't think of too 
many reasons. 

The OS-9 Level II release disk comes with no less than 
eight window device descriptors in memory. All you need 
to use them is run the iniz utility and start up a shell in 
the new window. If you are running with 5 1 2K in your Color 
Computer 3. you can open all eight at one time and run 



different processes in each. With a 128K machine, you are 
pretty limited and things will get tight rather quickly. You 
can only open one or two windows on one screen if you 
want to save enough memory to run a process or two. 

With the new Color Computer and OS-9 Level II, you 
can have it your way. You can create standard windows and 
overlay windows. If you use overlay windows, you can save 
the text or graphics image under the overlay, and the system 
will redraw it when you close the overlay window. You can 
pick the foreground color, the background color and the 
border color when you create a window. If you change your 
mind or get bored easily, you can change these colors on 
the fly, by typing short display commands. You can also 
discard windows after you are finished with them to free 
their memory for other processes. 



"With all those 
windows and the 
new immortal shell 
feature, why would 
you ever need 
another terminal?" 



Level II designers had your sanity in mind, loo! While 
you can create a window by typing hexadecimal parameters 
following the display utility command, they added a tool 
named wcreate that lets you create a window by typing 
a series of decimal numbers. Which would you rather type? 

059: display lb 20 5 50 IB 2 A 1 
0S9: wcreate /w7 -s=2 80 24 2 4 1 

Both of these command lines create a red screen with 
black letters and a blue border. In any case, just about any 
thing you could do with OS-9 Level I on the Color 
Computer, you can do better with OS-9 Level II. 

The difference between the OS-9 Level I and OS-9 Level 
II manuals is like day and night. The new manual is so large 
it will not fit in a standard binder. The 200-plus pages lie 
flat in the supplied binders, which makes them easy to use. 

This manual is more than 3 inches thick and has an 
excellent table of contents and a thorough index in each 
section. Dividers named Getting Started, OS-9 Commands, 
Technical Reference and Windows let you find the infor- 
mation you need about the operating system. Additional^, 
a section named BAS1C09 and an accompanying glossary will 
make it easy for you to learn this powerful high level 
language. 

The type style used in the manual is easy to read, and 
the designers used plenty of white space to take your eye 
where it should go on the page. The organization is clear 
and logical, and is much easier to follow than the Level I 
manuals. The Getting Started section shows you how to 
create a new window or two. 
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One of the features that consumers and reviewers alike 
demand these days is onscreen help. OS-9 delivers it with 
the utility command named help. If you forget how to run 
one of the standard OS-9 utilities, you need only type help 
followed by the name of the command. The help comes from 
a specially formatted text file in a file named helpmsgs in 
the directory 'dd'SYS. 

OS-9 Level 11 should be much easier to use than OS-9 
Level I. With a total of 512K of memory and separate 64K 
address spaces for the system and each individual process, 
you will find life much easier. In fact, most of the problems 
beginners have encountered with OS-9 revolve around the 
limited memory resources of the Level 1 system. They ran 
out of memory before they ran out of ideas. Then, they 
didn't understand the cryptic error messages. 

OS-9 is a very complex and powerful operating system. 
For this reason, it will take you quite a while to pick up 
on all the tricks. However, OS-9 command names are very 
logical and their syntax simple, if you use the default 
parameters and don't try to do anything fancy for the first 
week or two. After you are comfortable with the system, 
you can call in the many available parameters and get down 
to some fancy work. 

Ease of use is a completely different story. Once you have 
learned the basics, you will uncover more power every time 
you turn on the computer. Shortcuts can be found every- 
where. You'll find yourself typing less and enjoying your 
computer more. OS-9's anonymous directories, coupled 
with its concept of current data and execution directories, 
and its hierarchical file structure, make it easy to organize 
programs and data. 

The command line editor makes it easy to execute 
redundant commands with little typing. Procedure files do 
the typing in many cases, and pipelines let you run three 
or four processes concurrently to do one big job. With OS- 
9 Level II, you have plenty of memory to set up some nice 
pipelines. Even large programs running in BAS1C09 can be 
inserted in a pipeline; each process in line can have up to 
64K of space to use. 

OS-9 Level 11 prints an error number when it encounters 
a problem. After a few days you will recognize all the 
common errors. Until you do, you can use the OS-9 error 
command utility. Just type error, followed by the number 
reported by the system, and OS-9 will return an English 
language explanation of that number. These messages, while 
short, are easy to understand. The secret is — relax, lean 
back and ask yourself, "What did 1 do that caused this 
condition?" Ninety-nine times out of a hundred you will find 
you forgot something when you typed the command. 

Because of its versatility, power and extremely low price, 
OS-9 Level II has to be the best bargain on any computer, 
anywhere. The addition of MultiVue's point-and-click 
interface, and the standardization of application software 
it will force, will make OS-9 even more a bargain in the near 
future. When OS-9 MultiVue happens, you won't even 
realize you are running OS-9 — unless you want to — and 
you certainly won't want to be without it. 



(Tandy Corporation. Available in Radio Shack stores 
nationwide, $79.95) 



Software Review! 
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It's Marble Mania with 
Roller Controller 

Roller Controller is an arcade-type game written 
especially for the CoCo 3. It works with either 1 28K or 5 1 2K 
and is available on cassette or disk. The deluxe two-button 
joystick is recommended, but the game can be played using 
the keyboard. The program is not copy-protected so a 
backup can be made for protection. The disk version 
contains a BASIC loader, but the game itself is written in 
machine language. The program can be booted up using the 
DOS command, if you have Disk BASIC Version 2.1 or 
higher; otherwise, just type RUN "ROLLER". 

The game is written for either RGB or Composite 
monitors, and this selection is made when the game first 
starts. If you are using a TV set, you want to select the 
composite mode so the colors come out right. 

Roller Controller uses the highest resolution graphics 
mode available on the CoCo 3. You can expect excellent 
colors and detail. The game contains six different and 
increasingly difficult screens, each of which contains a maze 
of sloping planks and trap doors. Colored marbles are 
released at the top of each maze and roll down the planks. 
You must guide the various colored marbles by opening and 
closing the trap doors at just the right time, so the marbles 
drop into an appropriate bin at the bottom of the screen. 
Three levels of play are available. 1 played level one and 
after a few games I was able to qualify for a spot on the 
high games screen. At harder levels more than one marble 
rolls even faster down the planks at the same time. This is 
sure to challenge the most gifted arcade game player. 

The solid colored marbles are marked with a 'T'. These 
must be guided into one of three identically colored bins 
at the bottom of the screen. "Ringer" marbles are a 
combination of three colors and must be guided into one 
of two large funnels at the bottom of the screen. If you see 
you are going to miss the correct bin or funnel, you can, 
if you are quick enough, recycle the marble to the top of 
the screen by guiding it off to the extreme right or left side 
where a fan will blow the marble back up to the top plank. 
You have to be careful with this feature because the marbles 
roll faster as a result of being blown back to the top. 

"Happy" and "sad" faces at the upper-right of the screen 
are used to tell you how many marbles must be guided into 
the correct bins before the current screen is completed. The 
sad face will tell you how many "mistakes" you are allowed 
before the game is over. You get 50 points for each colored 
marble that goes into the correct bin but none for the ringer 
marbles. You also get 50 points for each unused mistake 
marble at the end of a screen. Bonus points are awarded 
at the conclusion of each wave consisting of a pattern of 
10, 1 1, or 12 screens depending on the skill level. 

Roller Controller is great fun. It's a unique diversion from 
the typical "shoot-'em-up" fare and will keep you on the 
edge of your CoCo seat for hours. In spite of its tame theme, 
it's one of the most challenging and unique games I've seen 
for the CoCo 3. 

(Spectrum Projects Inc., P.O. Box 264, Howard Beach, NY, 
11414, $29.95 plus $3 S/H) 
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Variety is the spice... 



MAX FONTS 1, 2, 3 or 4 Each set contains 24 fonts that are professionally 
designed and ready to use with CoCo MAX I or II. Each set includes a custom "pull 
down menu" that is used by CoCo MAX for selecting the fonts. Just "click" and use 
the same as any other font with CoCo MAX. 



Buy 2 sets and SAVE 10%, any 3 and SAVE 15%, 
all 4 and SAVE 20%! 



$24.95 each (disk) 



SET1 



SET 2 



SET 3 



SET 4 



Digi '. ai IblarJiusn 

Digital Large 
Futures 
Grid Small 

GRIND LORGI 

HAIFA 

Ia||®|ffl 



• .by T..lh Su.ll 

BABY TLLTH LC 

ceo© ecte 



Cartwhral 
N' o v in u n d p S m n 1 1 

Normande Medium 
NORMANDE LG. 
Piano 
SIHAL«A 



^tatlow 

Holofi 

c^SrjSFSjSh 



pMn|iiu*stii:ii|!Eii|»G!|ioii|[i 



F*«iq*OT S-.i-.ll 

Ptic^iwoT Large 
FFtiirnfii ainnii 

ppDCFnn nEdiLin 
PFOGFHI1 LHFGE 



I'llllll-ll llllll l[ Slllllll 

I'll! UltA iii.ic. 1,1: 

ISO GOGS SMI!] (11 Gp3 
LiUwiU Ll<3b i in. 

Mocno« Cum 

Mocnofl JIapre 
0IBI1 

ppinr out 

Prinluuli 5wir>ll 

PRinTDUT LPIRDE 



Bochlin 
Crcadwar 

IE'II2<DA.IDW.A.V ENiBR- 




^+jtiH 



OU £n B UsJi 

UHB'JH 

X<RX« MCNWM 

X<KX<$ LAR^< 

ceLtfc 

HARTLAND 

ScJUfit 

mm mwm 

STISNCII. 



.iF, .i>.JK. JK. .if. .ifc.tr.jr, 

Qvvliy «sy vty xSy %v U7 vL> 

Thin man 

Tl|i Top 



WQLTHR 



csw LM]K:£irjJI«M 



ebonii 

A AA A AA 

■Odin 



QUQBfgB 

Rome Small 
CI ITCC 

cirtluD 
I5(SG5lElS[QilP 

-H:[I VDG 

-~- -M- HI- O ECa 



SiHwin 

Square 



♦raiSic 



TELEWRITER-64 The word processor that has lead the 

way for over half a decade. Check out Cognitec's ad in this 

issue for all the features! Interface graphics with it using 

TELEGRAPHICS „ n nc . . . . 

$59.95 (disk) 

TELEGRAPHICS Interface HI-RES graphic displays from 
CoCo MAX or other graphic programs with Telewriter-64. Design 
a logo or letter head and have access to it whenever you're using 
Telewrite,-64! 



SIDE WISE makes your printer do something you never thought 
possible -print sideways! SIDE WISE will read ASCII text files 
generated by your spread sheet program and print them down 
the page instead of across. This allows you to indicate a printer 
width of up to 255 characters! No more having to hold 2 or 3 
pages together to get the entire picture of your work sheets. 
Compatible with DYNACALC and ELITE CALC. 

$24.95 (disk) 



CoCo MAX II The most used and highly acclaimed graphic 
editing program for the Color Computer 1 or 2. Just look at 
Colorware's ad in this issue for all the features! 

$79.95 (disk) 

MAX EDIT Create your own fonts for use right in CoCo MAX 
l/ll or load in existing FONTS for adding your own flair! Use all 
CoCo MAX options such as BOLD, ITALICS and SHADOW. 

$19.95 (disk) 



Derringer Software, Inc. 

PO Box 5300 Florence, SC 29502-5300 
Visa/MC customers call (803) 665-5676. 
or send check or money order. 

In business since 1982. 

SC residents add tax. 

Shipping: $3 UPS ground. S12 air mail (overseas) 

Canadian Distributor: Kelly Software 




GAME UTILITY 




7^^ One 4, a ^Uf$l&i 



_^y lways on the lookout for new games, 1 decided to 
f^f create some of my own, so I wrote Word Search. 
* ^ This program is a word search puzzle maker. It 
requires 32K with or without a disk drive. It is written in 
BASIC, and no commands need to be entered before loading 
or running. 

Word Search will take a list of up to 25 words and hide 
them in a word search puzzle. The puzzle size can range 
from 5 by 5 letters to 30 by 30 letters. Be sure to use a puzzle 
size large enough to hide all the words. The words will be 
hidden horizontally, vertically and diagonally, and may be 
spelled forward or backward, but always in a straight line. 

I have included many comments, so memory can be saved 
by removing them. The maximum number of words allowed 
in the word list is 25 (because of memory limitations). 

When entering the words, use a period to indicate the end 
of the list. Entering a hyphen lets you redo the previous 
word. Spaces are ignored. Thus, you can enter "New York," 
but it will be hidden as "New York." 

The array DD is weighted toward the diagonal. DD(1) 
through DD(24) put a word on the diagonal, and DD(2S) 
through DD ( 28 ) put a word either horizontally or vertically. 
If a word will not fit in any direction, you are given the 
choice of either beginning another puzzle in hopes the word 
will fit in the new one or dropping the word from the list 
and continuing with the present puzzle. 

When the puzzle is completed, the solution is printed first. 
Then, all the hyphens (indicating spaces) are replaced with 
random letters, and the word search puzzle is printed. 

I hope you enjoy Word Search. 1 have tried to make it 
as easy to follow as possible. As written, this program is 
designed to work with Radio Shack DMP printers. For 
those with other printer makes, all printer control codes are 
on separate lines and are identified with comments. D 



Ben Brunotte lives in Nederland, Texas, and works in 
opera/ions at a large oil refinery. He is a self-taught 
programmer, and the CoCo is his hobby. 



&<p ^enfamlK 74J. ^nuHotte 
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E-/S.BIO Ccjmina-n cJ-:s 



J B 
U K 
Z E 



R G 

Q M 

J R 

Q Z 

E D 

A T 



R E 

J X 

E U 

X U 

B H 

X 

E I 

M 11 



M R 

U R 

P 

M 

J 

C 

I 



P 
A 
P 

D 
V K 
S X 



W E 
U U 



Y I 



H M 
Z R 
S T 
L Z 
N E V 
C S 
E 
E 
C 
T 
A 
C 


I 



W N 
E S 



U M 

Z J 



L N Q E 
G I G V 
V R H 



R R 
I E 



A N M V D U 



D 

N C 

G 

J 



Z L 

R J 

B 

C K 



T 

M U 

Z fl 

G V 



R 

I Z 



W M 
V Z 
N E 



i 

F 
S 
D 

R 
D 
I 

S 
A 
T 
X 

L 

M 

B H H 
L F 
N F 
K U 
V V 
X 
V 

L A 
C 
S 
B 
F 



H 
H 
A 
G 
X 
G 
J 
V 
B A 
R V 



U N 

I L 



E 

Z 

C 

X 

K A 

B P 

L 

S 

E 

T 

G 



Y V 
Q X 



J L G 

E Y 

K F J 

E U M 

Y M G 



N 



V Y 



R 

J X 

M M 

E B 

C L 

L I 

M S 

U H 

M D 

Y U 



P 

N 
C 
W 

F 
P 
D W 
I T 



U 



M M 
W Z 



T W 



Y 

N 

D 


J 

s 

Z L L 
QMS 
NUB 



I U 

V K 

H R 

D 

R U 

D F 

Q P 



H N 
R G 



Find these uiords hidden in the pu::le above: 



CSAVEM 

EXEC 

HPAINT 

LLIST 

PRINTUSINS 

SCREEN 



DEFUSR 

GOSUB 

HSTAT 

PCOPY 

RENUM 

SK I PF 



DLOAD 

HBUFF 

INSTR 

PRINTTAB 

RESTORE 

TRON 



Sample Printout 
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" 180 ... 


....20 


240 ... 


2 


330 .. . 


...171 


430 .. . 


...200 


560 .. . 


...111 


640 .. . 


...131 


780 


.... 50 


890 


....27 


END 


41 



The listing: WD5EARCH 



10 '**************************** 

20 ' * * 

30 '* WORD SEARCH PUZZLE MAKER * 

40 •* BY BENJAMIN BRUNOTTE * 

50 '* COPYRIGHT 1987 * 

60 ' * * 

70 ' **************************** 

80 PMODE 0,1:PCLEAR 1: ' **FREE U 

P MORE MEMORY 

90 CLEAR 14000: CLS: DIM A$(30,30) 

,W$(25) ,DX(8,2) ,DD(28) :K=RND(-TI 

MER) : ' **RESERVE STRING SPACE & 

DIMENSION ARRAYS 

100 ' ***SET UP ARRAYS FOR PICKI 

NG DIRECTION TO PLACE WORD IN PU 

ZZLE 

110 FOR 1=1 TO 8: READ DX(I,1),DX 

(1,2): NEXT I 

120 FOR 1=1 TO 28: READ DD(I):NEX 

T I 

130 DATA 0,1,1,1,1,0,1,-1,0,-1,- 

1,-1,-1,0,-1,1 

140 DATA 2,4,6,8,2,4,6,8,2,4,6,8 

,2,4,6,8,2,4,6,8,2,4,6,8,1,3,5,7 

150 i ***INSTRUCTI0NS 

160 CLS: PRINT© 167, "WORD SEARCH P 

UZZLE": PRINT: PRINT: PRINT"DO YOU 

NEED INSTRUCTIONS (Y/N)?" 

170 IK$=INKEY$:IF IK$= M Y" THEN C 

LS ELSE IF IK$="N" THEN CLS : GOTO 

220 ELSE 170 
180 PRINT" THIS PROGRAM IS A W 
ORD SEARCHPUZZLE GENERATOR! THE 
PROGRAM TAKES A LIST OF WORDS, 
REMOVES ANY NON-ALPHABETICAL C 
HARACTERS EXCEPT SPACES, AND BUI 
LDS A WORDSEARCH PUZZLE WITH THE 
M.": PRINT 
190 PRINT" IF THE COMPUTER CAN 



NOT FIT AWORD IN THE PUZZLE, IT 
WILL ASK IF YOU WANT TO START O 
VER. THE WORD WILL BE DROPPED F 
ROM THE LIST IF YOU ANSWER 'N0 
'. IF NECESSARY, TRY USING F 
EWER WORDSOR A LARGER PUZZLE SIZ 
E." 
200 PRINT: INPUT" PRESS enter T 

O START ";IK$:CLS 

210 ' ***SET UP PUZZLE 
220 FOR 1=1 TO 25:W$(I)="":NEXT: 
CLS:' **CLEAR WORD LIST ARRAY 
2 30 PRINT: PRINT: INPUT "WIDTH OF P 
UZZLE: ";W:MD=W:IF W>30 THEN PRI 
NT"TOO WIDE. MUST BE 30 OR LESS 
.":GOTO 230 ELSE IF W<5 THEN PRI 
NT"MUST BE AT LEAST 5 WIDE.": GOT 
O 230:' **SET PUZZLE WIDTH 
240 PRINT: PRINT: INPUT "LENGTH OF 
PUZZLE: ";L:IF L>W THEN MD=L 
2 50 IF L<5 THEN PRINT"MUST BE AT 
LEAST 5 LONG.": GOTO 2 40 ELSE IF 
L>30 THEN PRINT"TOO LONG. MUST 
BE 30 OR LESS.": GOTO 240:' **SE 
T PUZZLE LENGTH 

2 60 PRINT: PRINT: PRINT "ENTER A HE 
ADING TO BE PRINTED AT THE TOP 

OF THE PUZZLE. (40 CHARAC 
TERS MAXIMUM) ": LINE INPUT HD$:IF 

LEN(HD$)>40 THEN PRINT"TOO MANY 

CHARACTERS .": GOTO 260:' ** INPUT 

HEADING FOR PUZZLE 
270 • ***INPUT WORD LIST 
280 CLS: PRINT '.PRINT: PRINT" THER 
E MUST BE AT LEAST 2 WORDS IN THE 

LIST AND NOT MORE THAN 25. ":P 
RINT" ENTER A WORD AT EACH QUES 
TION MARK.": PRINT" TO REDO THE 
PREVIOUS WORD, TYPE A HYPHEN 
(-).": PRINT" WHEN FINISHED, TYP 
E A PERIOD ( . ) . " 

290 FOR 1=1 TO 25: PRINT "NEXT WOR 
D: "; 

300 INPUT T$:' **INPUT A WORD 
310 IF T$="-" THEN 1=1-1 : PRINT"R 
EDO: ";W$(I):GOTO 300:' **CHECK 
FOR HYPHEN 

320 IF T$="." THEN IF I<3 THEN P 
RINT"MUST HAVE AT LEAST 2 WORDS. 
".•GOTO 300 ELSE M=I-l:GOTO 490:' 

**CHECK FOR PERIOD 

3 30 IF LEN(T$)=0 THEN PRINT" INPU 
T ERROR. ":PRINT"REDO: " ; : GOTO 30 
ELSE J=l:' **MAKE SURE A WORD 
WAS ENTERED 
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340 TE$=MID$(T$,J,1) : IF TE$<"A" 
OR TE$>"Z" THEN 360:' **CHECK FO 
R LETTERS ONLY 
3 50 J=J+l:IF J<=LEN(T$) THEN 3 40 

ELSE 410: ' **DONE? 
3 60 IF TE$=T$ THEN T$="":GOTO 3 3 
0:' **ONLY 1 NON-ALPHABETICAL CH 
ARACTER IN WORD 
370 IF TE$=" " THEN 350:' **SKIP 

IF A SPACE 
380 IF J=LEN(T$) THEN T$=LEFT$(T 
$,J-l):GOTO 410:' **REMOVE NON-A 
LPHA CHARACTERS 

3 90 IF J=l THEN T$=RIGHT$ (T$ , LEN 
(T$)-l) :GOTO 340 

400 T$=LEFT$(T$,J-1)+RIGHT$(T$,L 
EN(T$)-J) :J=J-l:GOTO 350 
410 IF LEN(T$)>MD THEN PRINT"WOR 
D IS TOO LONG.":PRINT"REDO: " ;:G 
OTO 300:' **CHECK IF WORD TOO LO 
NG FOR PUZZLE 

420 ' ***CHECK WORD LIST FOR DUP 
LIC ATE WORD 

430 IF 1=1 THEN 460:' **SKIP CHE 
CK IF FIRST WORD 

440 FOR K=l TO I-1:IF W$(K)=T$ T 
HEN PRINT "DUPLICATE WORD. " : PRINT 
"REDO: "; :GOTO 300 
450 NEXT K 
460 W$ ( I) =T$:CLS: PRINT" WORD LIST 

:":FOR K=l TO I : PRINTW$ (K) , :NEX 
T K:PRINT:' **PRINT WORD LIST ON 

SCREEN 
470 NEXT I:M=2 5 
480 ' ***PUT WORDS IN PUZZLE 
490 CLS0 : PRINT© 199 , "one" ;CHR$ ( 12 
8) ; "moment" ;CHR$ (12 8) ; "please" ; : 
FOR J=l TO L:FOR K=l TO W:A$(J,K 
)=CHR$(45) :NEXT K:NEXT J:' **PUT 

HYPHENS IN ALL PUZZLE SPACES 
500 CLS: PRINTS 3 7, "BUILDING THE P 
UZZLE.":FOR 1=1 TO M-l:FOR J=I+1 



TO M:IF LEN(W$(I) )<LEN(W$(J) ) T 
HEN W$(0)=W$(I) :W$(I)=W$(J) :W$(J 
)=W$(0):« **ARRANGE WORDS LONGES 
T TO SHORTEST 
510 NEXT J, I 

520 FOR 1=1 TO M:PRINT§37,"BUILD 
ING THE PUZZLE.": PRINT: PRINT"WOR 
KING ON WORD " ;W$ (I) : LN=LEN (W$ (I 
) ) : NT=0 

530 SD=DD(RND(28) ) : ' **SELECT DI 
RECTION AND STARTING SPACE FOR W 
ORD 

540 SX=RND(W) : X1=SX+ (LN-1) *DX(SD 
,1):IF XK1 OR X1>W THEN 530 
550 SY=RND(L) : X1=SY+ (LN-1) *DX (SD 
,2): IF XK1 OR X1>L THEN 530 
560 NT=NT+1:IF NT<>W*L*2 THEN 59 
0:' **NUMBER OF TRIES TO PUT WOR 
D IN PUZZLE 

570 PRINT: PRINT "CAN NOT FIT " ; W$ 
(I)," IN THE PUZZLE. ".-PRINT "STAR 
T OVER (Y/N)?": 1 **START OVER OR 

DROP WORD 
580 IK$=INKEY$:IF IK$="Y" THEN C 
LS : PRINTS 8 , "STARTING OVER" : GOTO 
520 ELSE IF IK$="N" THEN CLS : PRI 
NT@96,W$(I) ;" REMOVED. ":W$ (I) ="" 
:GOTO 650 ELSE 580 
590 J=SY:K=SX:FOR P=l TO LN:IF A 
$(J,K)=CHR$(45) OR A$ ( J, K) =MID$ ( 
W$(I),P,1) THEN 600 ELSE IF MID$ 
(W$(I) ,P,1)=" " THEN 610 ELSE 53 
0: ' **CHECK IF WORD FITS AND SKI 
P SPACES 

600 J=J+DX(SD,2) :K=K+DX(SD,1) 
610 NEXT P 

620 J=SY:K=SX:FOR P=l TO LN:IF M 
ID$(W$(I) ,P,1)=" " THEN 640 ELSE 

A$(J,K)=MID$(W$(I) ,P,1) : ' **REP 
LACE HYPHENS WITH LETTERS OF WOR 
D IF IT FITS AND SKIP SPACES 
630 J=J+DX(SD,2) :K=K+DX(SD,1) 



Mowing up to a Turbo PC/XT cumpatiblc 
costs less than you think. 

• 4.77/B Khz Turbo |sol»*are controlled) 
« 256K Memory (640K Expandable) . (») 
t 360K DSDD Disk Drive. 
» isoif Power Supply 

• Real Time Clock, 
with battery backed Time & Date. 

• Parallel Printer Port. 

• 1 Serial Port (2nd port optional). 

• Game Port . 

• IT Style Keyboard. 
» Mono Graphics Adapter. (■•) 

• High Res. Monochrome Monitor. (••) "i 

• HS-DOS 3 . 1 
■ Fall 6 Mo. 

s 5 g 7 so 

Mono System 




Limited Warranty ,»;/;' -7 , ■» 

L___ •■///■■'J 



(»t)Substitute Colour Graphics Adaptor Srinc 0O_ 
and TTL Colour Horn tor ict f ■?•-' 



(•) 640K upgrade add S 45.00 

2nd Floppy Disk Drive S 69.00 

2nd Serial Port add S 22.00 



300/1200 Baud Modem 3112.00 

Mouse (serial port) S 6B.0O 

MS-DOS 3.2 w/ GW Basic add.S 65.00 
20Mb Hard Disk w/Controler.$389.00 



ITflTT T ATT nriTjrvTir^ ATT 

NEW Luw ri\i^-JLo ufi 

DSDD 5 1/4" Disks; $.48ea../$41 .00 box 100 
with sleeves & lsbles. 100% GUARANTEED. 

t.fcE AD IN LAST ISSUE FOR FRINTER RIBBONS 

Calif, add 6.5X Tax. / C.O.D. ADD SI. SO 

Voice (813)304-1393 / Data (305)253-0221 

Canyon County Devices 
p. 0. Box c 
Saugus, Ca. 91 350 

PRICES APPLY TO IMTED STATES ORDERS ONLY 
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64j3 NEXT P 

65j3 NEXT I 

660 TB=(8#-(2*W) )/2: * **TAB SETT 

ING FOR 80 COLUMN PRINTER 

670 POKE 150,41:' **12J2)j3 BAUD 

680 CLS: PRINT "READY PRINTER TO P 

RINT PUZZLE. ":INPUT"HOW MANY COP 

IES";CP 

690 PT=1: ' **SET PRINT COUNTER T 

1 

700 FOR 1=1 TO M-l:FOR J=I+1 TO 

M:IF W$(J)<W$(I) THEN W$(0)=W$(I 

) :W$(I)=W$(J) :W$(J)=W$(0) : • **PU 

T WORDS IN ALPHABETICAL ORDER 

710 NEXT J,I:X$= !l SOLUTION" 

720 PRINT#-2,CHR$(27) ;CHR$(18) ; : 

1 **NORMAL CORRESPONDENCE PRINT 

730 PRINT "PRINTING ANSWER COPY"; 

PT:GOSUB 800: IF PT<CP THEN PT=PT 

+l:GOTO 730:' **PRINT EACH COPY 

740 PRINT"FILLING IN PUZZLE. " : FO 

R J=l TO L:FOR K=l TO W:IF A$(J, 

K)=CHR$(45) THEN CK=RND (26) +64 : A 

$(J,K)=CHR$(CK) : ' ** RE PLACE HYPH 

ENS WITH RANDOM LETTERS 

750 NEXT K,J 

760 PT=1:X$=" ":' **RESET PRINT 

COUNTER 

770 PRINT" PRINTING PUZZLE COPY" ; 

PT:GOSUB 800: IF PT<CP THEN PT=PT 

+l:GOTO 770:' **PRINT EACH COPY 

7 80 CLS : PRINT : PRINT : PRINT : PRINT : 

PRINT: PRINT" N = NEW PUZZLE" : PRI 

NT -.PRINT" Q = QUIT": PRINT: PRINT" 

PRESS KEY FOR CHOICE " 

790 IK$=INKEY$:IF IK$="N" THEN R 
UN ELSE IF IK$="Q" THEN END ELSE 

790 
8j30 PRINT#-2,CHR$(13) ;CHR$(13) ;C 
HR$(13) ;CHR$(13) :PRINT#-2,TAB( (8 
0-(2*LEN(HD$) ) )/2) ; : ' **CENTER H 
EADING 5 LINES FROM TOP OF PAPER 



810 PRINT#-2,CHR$(15) ;: ■ **UNDER 

LINE 

820 PRINT#-2,CHR$(27) ;CHR$(14) /: 

1 **ELONGATION 

830 PRINT#-2,HD$; : • **PRINT HEAD 

ING 

840 PRINT#-2,CHR$(14) ;: ■ **END U 

NDERLINE 

850 PRINT#-2,CHR$(27) ;CHR$(15) : ' 

**END ELLONGATION 
860 PRINT#-2,TAB((80-LEN(X$) )/2) 
;X$;CHR$(13) ;CHR$(13) 
870 FOR J=l TO L:PRINT#-2,TAB(TB 
) ; : ■ ** CENTER EACH LINE 
880 FOR K=l TO W: PRINT#-2 , A$ (J, K 
);" ";:NEXT K: ' **PRINT EACH LET 
TER IN A LINE 

890 PRINT#-2,CHR$(13) ; :NEXT J 
900 FOR 1=1 TO 3:PRINT#-2:NEXT I 
:B$="Find these words hidden in 
the puzzle above: ": DD=(80-LEN(B$ 
) )/2:PRINT#-2,TAB(DD) ; : ■ **CENTE 
R MESSAGE 3 LINES DOWN 
910 PRINT#-2,CHR$(15) ; : ' **UNDER 
LINE 

920 PRINT#-2,B$; 

930 PRINT#-2,CHR$(14) : ■ **END UN 
DERLINE 
9 40 MD=0 

95p • ***PRINT WORD LIST IN COLU 
MNS BELOW MESSAGE 

960 FOR 1=1 TO M:IF W$(I)="" THE 
N 1000 

970 PRINT#-2,TAB(DD+MD) ;W$(I) ; 
980 MD=MD+16:IF MD=48 THEN MD=0 : 
PRINT#-2,CHR$(13) ; 

990 IF POS(-2)>MD+DD THEN MD=MD+ 
16: GOTO 980 
1000 NEXT I 

1010 PRINT#-2,CHR$(12) ; : ' **PRIN 
TER FORM FEED 
1020 RETURN 
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ORDER PHONE (416) 456-0032 

Get your tree Catalogue! May we market your programs? 

Duck Productions, 18 Rowe Cour. Brampton. Ontario. Canada L6X 2S2 
Please add $2.00 lor handling Ontario residents add 7% provincial lax 



Micro • Fire the ultimate secret weapon. 

Have you beat your thumbs more lltan the aliens 7 This is a great 
rapid lire circuit Ihat's easily installed on any (oystick . Has no computer 
side ellects Comes with complete instructions and calibration program 
lor adjustment to laste. $19.95 ($24.95 CDN.) Reviewed October 86 

Class Monitor Dual monitor driver 

The best monitor driver lor any Coco. It drives any composite, colour 
or monochrome monitors Complete with dual audio outputs lor 
immediate access ol either or both monitors. Simple installation 
instructions. $31. 50 {$39.50 CDN.) 

Laser Mazer master puzzle ol retlections 

The supreme game ol suspense. Engage in a strategic battle ol time 
and space. A realtime contest ot wits. S 1 4 95 (Si 9 95 CDN ) 
Battle to D-Day the multiple player adventure 
The master game ol strategy. Battle against time, battle against the 
Third Reich Up to lour joystick players. Adventure tn thoughtware. 
L S29.95 ($38.95 CON.) 




OUflLITV 

COMPUT6R PRODUCTS 



•JC 



RAINBOW 

CERTIFICATION 
SEAL 



Machine Genisis assembly tutor. ..plus 

is a clean and simple appioach to learning binary piogiamming The 
package includes lull beginners instruction m plain language, an editor 
assembler, a debugger, a disassembler and utilities lor advanced study 
and application. Fantastic value at only $34.95 ($49.95 CDN.) 

Buy Quality and Value! 



Keeping Track more than a disk manager. ^ 

II you own more lhan two disks you'll love Keeping Track A manager 
menu ol nine utilities that do it all! The real highlight is "D". tne 
directory /autostart. It's a continuous access ID. directory that loads 
and executes any program with a single keysiroke All programs 
'documented SPECIAL SALE! only $14.95 ($19.95 CDN) 

Map 'n Zap semi automatic disk repair 
The layman's step by step kit lor directory and grain table repair 
locates errors, maps out disk contents to screen or printer, backs 
up any Hawed disk and prompts built in disk zap lor repair Complete 
with lull lulorial on Coco's disk input / oulpul access operation 
$19 95 ($24.95 CON ) Reviewed January 87 

Code Buster machine language disassembler 

Three ternlic programs to explore machine language Screen or printer 
accurate disassembly ol binary code. Simple prompted procedure 
wilh some instruction lo dissect and understand your ROMs. Fully 
documented lor only 519.95 ($24.95 CDN.) 
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TURN OF THE SCREW 



The Hardware Project Basics Review 



By Tony DiStefano 
Rainbow Contributing Editor 



Recently it was brought to my 
attention that some readers of 
my column seem to be having a 
bit of trouble constructing the projects. 
When 1 bought my first CoCo. the first 
thing I did when 1 got it home was take 
the cover off to see what made it tick. 
1 spent many hours inside the CoCo and 
many hours reading technical manuals 
on how the different components of a 
computer work. I also spent a lot of time 
with a soldering iron, soldering things 
together and taking them apart again. 
In short, 1 have a lot of experience with 
the CoCo and computers. 

A lot of people use the CoCo as a 
means to an end. They are not hardware 
hackers. Other people are hobbyists 
who want to dig in and learn all about 
the insides of the computer. Whatever 
background you have with computers, 
or whatever electronics experience you 
have, 1 am sure you will agree that 
digging inside a computer requires a 
little skill and a lot of patience. Here are 
a few hints and tips on how to sucess- 
fully complete a project. 

The first and most important factor 
to consider is the project itself. Ask 
yourself, will it suit my needs? Is it 
within my budget? Will I learn anything 
from it? If all the answers are yes, then 
you can proceed. Once you have de- 
cided to tackle the project, you must 
learn all you can about it before you 
begin. It is important to read the whole 
article before you start. Make sure you 
understand the object of the project and 
the skills required. If there are parts you 
don't understand, study them over and 



Tony DiStefano is a well-known early 
specialist in computer hardware pro- 
jects. He lives in Laval Quest, Quebec. 



over. Refer to other articles of the same 
nature or reference books that touch on 
that subject. Technical data books are 
readily available from your local elec- 
tronics distributor. Texas Instruments 
and Motorola have excellent books on 
understanding microprocessors, as well 
as technical data manuals. Never start 
a project if you are not sure you can 
finish it or if you do not fully under- 
stand the whole project, start to finish. 

Once you have read the article and 
are confident you can finish it, the next 
step is parts. Make a list of all the parts 
you will need. Then do your shopping. 
If you are missing a part or two, don't 
start the project. Not only is it frustrat- 
ing to have to stop because you are 
missing a part, but you lose the momen- 
tum of the project. Returning to a 
project after a while may cause you to 
skip a step. You may even lose interest 
and give up the project all together. So 
don't start until all the parts are in. 

Another point you must consider is 
whether you have all the tools you need. 
Projects that require you to build some 
kind of hardware gizmo require tools. 
Make sure you have all the tools neces- 
sary to build your project. If mounting 
parts requires you to drill a hole, make 
sure you have the right size drill bit and 
that it's sharp. A sharp bit (or whatever 
the tool) is easier to work with; you 
don't have to force a sharp bit into a 
sheet of metal. A dull bit will drift 
before it cuts and may cause damage to 
the project and to you. 

When you are about to start a project, 
take time to clear a good place to work. 
The work area must be free for the 
entire time it takes to do the project. If 
it is going to take more than one day to 
do, make sure that you will not need the 
work place for something else. It is too 



easy to lose or break something if you 
have to put the computer and all the 
loose parts aside to repair the toaster. 
This way, you can continue exactly 
where you left off. If the project has a 
complex circuit or a lot of instructions, 
it may be wise to photocopy the article 
and staple the article together. This way 
you don't have to worry about getting 
your magazine dirty, torn or worn. 

OK, you have all the parts, a clean 
workplace and all the tools necessary to 
do the project. Take things one step at 
a time. Build, cut, solder and do what- 
ever is required of the project. At this 
time, it may be wise to consider the well- 
being of your computer. Some projects 
may require you to cut, bend, or modify 
the computer's PCB (Printed Circuit 
Board). Now, cutting a PCB may be 
quite permanent. Before you cut, look 
around to make sure you will not acci- 
dentally cut other things. Also, make 
your cut in a place that is accessible 
enough that you can rewire that cut, if 
you need to. 

Removing ICs is a tricky task. There 
are more versions of the CoCo than 
there are versions of PacMan, and every 
one of them is different. On the older 
CoCo Is, almost all the chips are sock- 
eted. The contrary is true for the newer 
CoCo 3s; almost all the chips are sol- 
dered directly to the PCB. 

Special consideration must be given 
to this situation. If the project requires 
that you lift, bend or cut a pin on an IC 
that is soldered in, you have two choic- 
es. Both of them are a pain. The first 
choice is to cut the pin and solder it to 
the stub. If you don't do it right, the pin 
will break off. Also be careful not to 
short-circuit to the next pin. 

The other way is a bit longer. It 
requires you to completely remove the 
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chip, which is a very hard procedure to 
follow. A lot of soldering experience is 
required. Most people use a soldering 
iron and some solder wick. Heat each 
pin (one at a time) until the solder flows. 
Remove the iron, lay the wick onto the 
pin and press the iron on top. The wick 
will draw the solder and leave the pin 
and hole empty. Do each pin one at a 
time. Then remove the chip and clean 
the pins with the same stuff. Now, insert 
a socket where the chip was and solder 
it into place. Remember to position the 
socket so that Pin 1 of the socket 
matches Pin I of the chip. 

When at all possible, if the instruc- 
tions of the project require you to solder 
to an IC or bend the pin of an IC, use 
a socket instead. Remove the IC in 
question, insert the IC into a good 
quality socket and treat the pins of the 
socket like the pins of the IC. This way, 
if you break a pin off, all you have to 
do is replace the socket and not the chip. 

When you are finished, don't jump 
right in and try it. Take time to clean 
up your bench, put your tools away and 
check your work. Go over the project 
step by step again. Make sure all wires 
are properly soldered, components are 
all in their proper places, and there are 
no short circuits on your project. Before 
you plug in your project, blow the dust 
and shavings out of the computer. If you 
don't have anything to blow with, hold 
the computer or project upside-down 
and gently tap the bottom of the com- 
puter. This will dislodge any bits of drill 
shavings or wire that may have fallen 
into the computer. Now put the thing 
together and try it out. 



Plug all connectors and wires in and 
connect the power to the computer. 
Turn the TV or monitor on first; do not 
connect anything that is not necessary 
for the operation of the project you are 
testing. For instance, if you don't need 
to have the disk controller plugged in, 
leave it out. Then if you do have a 
problem, you will at least have saved 
your controller from abuse. Turn the 



"If you are certain 
your work is good, 
but it still doesn't 
function, look at the 
circuit diagram. " 



computer on and watch the monitor. 
The familiar CoCo screen should ap- 
pear. Pay close attention to the monitor; 
if you suspect something is wrong, turn 
the computer off right away. 

Don't panic! Go over your work step 
by step. Check all your connections. 
Check for chips that have been installed 
backward, or transistors or diodes that 
have been reversed. Depending on the 
type of solder you use, a deposit will be 
left behind after you solder. This can act 
as a conductor at high CPU clock 
speeds. It must be cleaned off. Use a 
recommended flux remover. Re- 
member, some of the stronger flux 
remover can melt plastic. Don't clean it 
on your work table. Go outside or to the 
sink in the laundry room. 

If you are certain your work is good. 



but it still doesn't function, look at the 
circuit diagram. There may be a way to 
check only a section of the project at a 
time. Fall back on the theory of the 
circuit, and if you have some test equip- 
ment, check for proper voltages on the 
power supply and ground. If all else 
fails, restore the computer to what it 
was before you started and make sure 
it still works. Once you know the com- 
puter works, check the project carefully 
and try it again. 

A few articles ago, I showed you how 
to interface the MC6847T1 chip into the 
older CoCos. One of the chips required 
rewiring. I had the diagram for the 
computers I had, but not all of the 
computers are the same. A couple of 
readers sent me the pinouts to this chip. 
I have not tried these out, but I am 
passing them along to you anyway. You 
are on your own to verify whether they 
work. 

The first is from John A. Lind of 
Corona, Calif., whom I met at the Color 
Expo 87. The computer in question is 
the CoCo 2, Catalog No. 26-3127. The 
board markings are 8709416 Rev B 
DWG NO. 1700235. The jumpers for 
the U5 (74LS273) socket are as follows: 
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13 
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14 


2 


17 


19 
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PRINTERS! 

N EW! Okidata 1 92+ (Par. or Ser.) s 370 

M EW! Okidata 193 (Parallel) $ 540 

N EW! Okidata 193+ (Serial) *6I0 

Okimate 20 Color Printer *I3S 

Fujitsu 2100 (80 col.) S 4I0 

Fujitsu 2200 ( 1 32 col.) s 520 

Toshiba 321 (Par.orSer.) S 5I0 

Qume Letterpro 20 (Letter Qual.) s 445 

Silver Reed 420 (Daisy Wheel) $ 240 

Silver Reed 600 (Daisy Wheel) $ 57S 

(Add 5 I0 Shipping for Printers) 



ACCESSORIES! 

Taxan 1 2" Green Monitor s 125 

Taxan 12" Amber Monitor ' 1 3S 

Table Top Printer Stand 

w/ Slot (80 col.) s 30 

Table Top Printer Stand 

w/Slot(l32col.) '45 

Stand w/Diskette Storage (80 col.) $ 47 

Stand w/Diskette Storage (132 col.) l 57 

Other Printers. Monitors, and Acccssones for CoCo 

and IBM upon request. 

S I5 off interface with purchase of printer. 

Find your cheapest published price and we'll beat it!!! 



DISK DRIVE SYSTEMS! 

ALL >A HEIGHT DOUBLE SIDED 

Drive (addressed as 2 drives!) s 235 

Drive 0,1 (addressed as 4 drives!) '350 

All above complete with HDS controller, 
cable, & drive in case with power supply 

Bare Double Sided Drives '109 

Dual '/i Height Case w/ Power Supply s 49 

Double Sided Adapter S 2S 

HDS Controller, RS ROM & Instructions s 99 

25 CDC DS/DD Diskettes s 32S s 3s/h 

We use the HDS controller exclusively. Can use 2 different DOS ROM's. 

Shipping Costs: s 5/drive or power supply. 10 max. 

Co Co Serial Cables IS ft.-'IO. Co Co/RS-232 Cables 15 ft.-*20. 

Other cables on request. (Add ^l® shipping) 



SP-2 INTERFACE for 
EPSON PRINTERS: 

■ 300-19,200 BAUD rates 

■ Fits inside printer — No AC Plugs 

■ Optional external switch ( l 5 00 extra) frees parallel 
port for use with other computers 

■ l 49" (plus <3°° shipping) 



SP-3 INTERFACE for 
MOST OTHER PRINTERS: 

■ 300-19.200 BAUD rates 

■ External to printer — No AC Plugs 

■ Built in modem/printer switch— no need for Y-cables or 
plugging/unplugging cables 

■ s 64" (plus >3 M shipping) 



8oth also available for IBM, RS-232 and Apple IIC computers. 



R 



P.O. Box 293 
Raritan, NJ 08869 
(201)722-1055 

ENGINEERING 
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Added notes: Pins 10, II, and 20 are used for clock, +5V 
and GND. No jumper to the SAM chip is necessary. 

The second diagram is from Mr. Ralph Fox of New 
Zealand. Mr. Fox wrote: "Although your column did not 
mention it, it is also necessary to bend up Pin 12 of the 
6847T1 VDG as well as Pin 31. The reason is Pin 12 is 
connected to Pin 37 (FS) on the CoCo's main circuit b oard ; 
so if you jumper Pin 12 of the new VDG to Pin 10 (WE) 
of the SAM, you will get contention between the VDG's 
FS output and the SAM's WE output." 



CoCo-1 E boards (boards numbered 8709137-E) 



U7-6847 
U6-74LS273 



6847T1 
(replaces 6B47) 



DIP hoador 
(replaces 74LS273) 



bond up 
pin.2->!!^ 




solder a clippod-oll pin 
io Ihls Grid ol the jumper 
to plug into tho sockol 

inside numbers are DIP header pin numbors 
outside numbers are 74LS273 pin numbers 



Figure 1 shows Mr. Fox's diagram on how to wire the 
CoCo I 'E' board. Figure 2 shows how to wire the CoCo 
2 PAL version. Thank you for these diagrams and infor- 
mation; if I get more, 1 will pass them on to RAINBOW 
readers. 



CoCo-2 PAL version (boards numbered 20261027) 



ICO 6847 
IC10 74LS273 



6847T1 
I replaces 6847) 




DIP header 
(reploccn 74LS273) 



(the 74LS273 has a 
notch al Ihls ond) 



bend up 
"pin 31 




solder a clipped-otl pin 
to this ond of Iho |umpor 
!o plug Into tho sockol 

Inside numbers are DIP header pin numbers 
oulside numbers are 74LS273 pin numbors 



/R\ 



Announcing the Fourth Rainbow 

Adventure Contest! 



We invite all Color Computer enthusiasts to try their hand at writing 
the perfect Adventure. It might be a 4K, text-only entry, or it might 
utilize the full power of the CoCo 3. It might be written in BASIC or 
it might consist entirely of assembly language instructions. 

Looking for ideas? You need only examine past issues of THE 
RAINBOW for plenty of samples and tutorials covering the fine art 
of creating Adventures. 

What will our judges be looking for? Originality counts the most, 
but several other items are worth noting: 



• creativity 

• programming efficiency 

• clarity of instructions 

• ease of use 



vocabulary and grammar 
responsiveness 
level of challenge 
enjoyment 



Your submission should include all programs and information 
needed to set up and run the Adventure. All programs must be sent 
on tape or disk. Several saves of each program must be included with 
at least one ASCII save of each. If an Adventure cannot be loaded, 
it cannot be judged. We will not type in even the shortest of programs! 
Hard copy of all program listings and instructions must also be 
included. If your submission involves machine language routines, all 
source code should be included on the tape or disk. Point out any 
special features of your Adventure or programming which you feel 
deserve special attention. Finally, indicate the minimum CoCo system 
required to run your Adventure and include a complete solution. 

Some Hints for the Successful Adventure: The judges will also be 
concerned with the "publishability" of each Adventure. A shorter 
program is easier to fit into print (both in The RAINBOW and any 
subsequent Adventure book) as well as being easier for the reader 
to type in. Don't use packed lines that can't be listedorLLISTed for 
the benefit of our readers. Your program should run on standard 
Radio Shack equipment without requiring any special modifications, 
and should not rely on commercial software for its execution. The 
only exception is the use of the OS-9 operating system (Level I and 
Level II) and BASIC09. If your Adventure uses graphics (which are 
not necessary for winning), make sure the graphics are self- 
contained. In other words, don't submit a program that loads several 
different graphics screens unless those graphics are created by a 
printable program included in the submission. 

In summary, send a complete package. Put the accompanying 
article, documentation, listings, complete loading insructions, 
solution and cover letter on paper. Include your name, address and 
telephone number on each page of all materials. Be sure to write- 
protect your disk or punch out the tabs on your cassette to avoid 
accidental erasure, and label each with the name of the program(s) 
and your name and address. As in any contest, packaging does make 
a difference. 

Your entry must be postmarked no later than August 15, 1987, in 
error-free condition. Each entrant will receive a free pass to the 
RAINBOWfest of his or her choice. You may also win one of the many 
prizes donated by our generous advertisers as well as have your 
program published in RAINBOW! 

Additional Rules: All entries must be original, unpublished and 
unmarketed works, no "conversions." No programs that have been 
placed in the public domain will be accepted. Entries become the 
property of Falsoft, Inc., publisher of THE RAINBOW. The decisions 
of the judges are final. Duplicate prizes will be awarded in the event 
of ties. Winning entries will be featured in a future issue of RAINBOW. 
Address entries to "Adventure Contest Editor" and send to The 
Rainbow, 9509 U.S. Highway 42, P.O. Box 385, Prospect, KY 40059. 
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HARDWARE PROJECT 



Presenting the 

5marter-Than-Average 

Printer Buffer 



By Emmett J. Lewis Jr. 



til hat is better than a Color Com- 
\J\t putcr? The answer is easy — 
ww two Color Computers. The 
problem in the past has been what to do 
with the second CoCo. Well, you are 
going to like this, especially if you use 
your printer often. 

A printer buffer, by the way, is a 
hardware device that accepts data from 
the main computer and stores it. The 
printer buffer then sends the data to the 
printer, freeing the main computer for 
more important tasks. The main com- 
puter is the computer you use for word 
processing or programming. 

Suppose you are writing a long pro- 
gram and decide you would like a copy 
to study. Normally, you would have to 
wait for your printer to finish typing 
your program. With a print buffer you 
can send an entire 64K document in one 
minute 38 seconds, and let the printer 
buffer do all the waiting. 1 made an 
important discovery after finishing this 
project — my computer is much better 
at waiting than 1 am. 1 think you will 
also discover this. 

To date, printer buffers cost more 
than the 64K Extended Color Comput- 
er and perform only one function. Now 
you can have your cake and CoCo too. 
With Print huf yon now have a smarter- 
than-average 64K printer buffer and a 
useful computer. Printhuf works with 
disk, tape, BASIC or Extended basic. As 

Emmett J. Lewis Jr. has been an elec- 
tronics technician for Southwestern 
Bell Telephone Co. for 13 years. He 
spends four or five hours a clay pro- 
gramming the CoCo and is the author 
of the WordTriad word processor. 



a matter of fact, this program does not 
need any ROM, only 64K RAM. It is 
a 100 percent self-supporting machine 
code program (i.e., it uses no ROM 
calls) that is poked into BASIC, so the 
user can implement changes easily (e.g., 
baud rates, control codes, etc.). 

To get started, you need to build a 
printer selector/ de-selector (a simple 
hardware project). If you do not want 
to build a printer selector/ de-selector, 
no problem. You just have to switch 
cables when you want to download 
from the computer or send the contents 
of the buffer to the printer. However, at 
the very least, you will still need to build 
a main computer-to-buffer computer 
cable (extra simple). 

To build a printer selector/de- 
selector, you need the following mate- 
rial: 

1) 5 VDC DPDT relay. R.S. Part No. 
275-215. 

2) Two 4-pin plugs. (Plugs into the 
printer socket.) R.S. No. 274-007. 

3) 5-pin plug. (Plugs into cassette 
port.) R.S. No. 274-003. 

4) Battery holder for four AA pen- 
light batteries and, of course, 
batteries. R.S. No. 270-383; snaps, 
R.S. No. 270-325. 

5) Plastic case to hold all the goods. 
R.S. No. 270-231. 

6) About 7 feet of 4-conductor 
stranded telephone wire. 

7) Two 47-ohm resistors to reduce 
current drain. R.S. No. 271-009. 

8) Circuit Board. R.S. No. 276-148. 

9) Inline jack or plug to plug into 
your printer. Plugs, R.S. No. 274- 
007; jack, R.S. No. 274-018. 
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All these items can be found at Radio 
Shack for about $15. Once the items are 
purchased, assemble them as shown in 
Figure 2 or Figure 3. Figure 2 is for 
those who are able to follow schematic 
drawings using any DPDT relay. Figure 
3 is for those who have difficulty with 
schematics. For Figure 3 to work, you 
will need the Radio Shack relay. Illus- 
tration I gives you a general idea of how 
the finished product is supposed to 
operate. As you can see, this project will 
present little difficulty, even for new 
technicians. 

To use Printbuf, load in the BASIC 
program and run it in the extra CoCo 
you plan to use as the printer buffer. 
After you run Printbuf, it takes a few 
seconds to poke the program in mem- 
ory. After the program is poked into 
memory, Printbuf asks if you would like 
to enter as many as three control codes 
each time the printer option is selected. 

There are many reasons you may 
need to send a control code to the print- 
er. The reason I put this option in is that 
the printer selector/ de-selector some- 
times generates errors in the printer (I 
have a Gemini 10X with a serial-to- 
parallel converter) and, if errors are in 
the printer, they will soon be on the 
paper. If you select the printer only 
when there is something to print out, 
you will not get any errors. The only 
time you get errors is when you select 
the printer option and the print buffer 
is empty. 

To avoid errors you may use "Delete 
last character control codes" (127 for 
the Gemini). If you choose to have 
control codes sent to the printer, the 
next three questions ask what they are. 
If you only need one code, then answer 
the next two questions with (press 0). 
If you do not want control codes sent, 
press N (no). The next question asks if 
you would like to change the download- 
ing to buffer baud rate. Normally this 
should not be changed, but you can do 
it if you want. 

Next, you are asked if your printer is 
9600 baud. If not, enter your printer's 
baud rate by entering the number fol- 
lowing the baud rate. For example, for 
a baud rate of 600, enter 87. Next, you 
are asked if you would like to save the 
customized version on disk or tape. If 
no, press N and Printbuf executes. If 
you press Y (yes), you are asked if you 
would like to save to disk or tape. If you 
enter DISK, then PRINTBUF.BIN is 
written to disk. If you enter TAPE, then 
Printbuf \s written to tape. 



When relay operates, main 
computer is disc, from 
buffer comp. and printer is 
conn, to buffer computer. 
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After Printbuf is saved to tape or 
disk, you can execute by typing CLOADM 
or LOADM"PRINTBUF" and then EXEC. 
Since the program is now in machine 
code, you will not have to wait for it to 
be poked into memory. 

After the questions are answered, the 
BASIC program pokes the machine code 
into bytes 4096 to about 5300. After the 
DATA statements are finished being 
poked in, the machine code executes 
and relocates itself to addresses 000 to 
1020, where Printbuf resides. The menu 
is then displayed. The options on the 
menu work as follows. 

is the buffer indicator. It lets you know 
how much memory (buffer space) re- 
mains. Naturally, the E is for "empty" 
and the F is for "full." Each > is equal 
to 2194 bytes. Each byte can contain 
one letter. 

D stands for "Download from main 
computer." This allows downloading 
from the main computer by pressing the 
D key. 

Now you are ready to receive text or 
other information from the main com- 
puter via the serial I/O port. To set the 
main computer's baud rate to 9600 
baud, use the BASIC command POKE 
150,1. Now, just use any printer com- 



mand (e.g., PRINTS -2, "SMARTER 
THAN THE AVERAGE PRINTER BUFFER") 
or program in the main computer. As 
information is downloaded, it is dis- 
played on the buffer computer's screen. 

The only way to exit the D option is 
with the M (Menu) key. After the M key 
is pressed, "Remove last carriage re- 
turn? Y.N" is displayed. The reason for 
this option is some programs send an 
extra carriage return at the end of 
printing so the printer's buffer is emp- 
tied before exiting the subroutine. If 
your program sends an extra carriage 
return at the end of printing, sooner or 
later you are going lo begin in the 
middle of the page instead of the begin- 
ning. Generally, it is a good idea to 
answer yes to this question if you are 
going to download several segments 
(e.g., chapters of a book) and then print 
them all at one time. But do not remove 
the extra carriage return for the last 
downloaded segment. If you are only 
going to download a single document 
and then print it, answer no. 

R stands for "Reset or restart, erase 
all." This key is used to erase and reset 
the buffer computer. Do not press the 
R key unless you are finished with the 
buffer's contents. 

P stands for "Print out contents of 



buffer." This sends the contents of the 
buffer to the printer. Do not press this 
key unless the printer is properly con- 
nected and turned on. If you press this 
key without the printer connected, 
Printbuf will wait until you connect it. 
The Buffer indicator is continuously 
updated to let you know how much is 
left to be printed; only now, each > mis- 
sing from a full buffer indicates 2194 
bytes left to be printed. The print option 
will automatically exit when the buffer 
indicator is full. You may exit during 
printing by pressing the M key. 

C stands for "CLEAR &HFF20, 
release print sub." If, for some reason, 
you are downloading and run out of 
memory (you will get a "Buffer full 
alarm"), Printbuf will display the alarm 
for a short time and automatically 
return you to the menu. If this happens, 
you will notice the main computer is still 
waiting (hung up) for an OK from what 
it thinks is the printer. It will wait 
forever unless you release it by pressing 
the C key. The C key clears SFF20, 
which tells the main computer the 
printer is receiving information. Ob- 
viously, this is not what's actually 
happening. The information is placed 
instead in the bit bucket behind the 
computer. After pressing the C key, you 
need to exit the printing subroutine on 
the main computer. 

E stands for "Escape to BASIC *cold 
start*." When you press this key, 
"******* Are you sure? ******" is 
displayed. If you press Y, then you are 
exited to BASIC and Printbuf \s gone. If 
you press N, you get the menu. 

When you see "Buffer full alarm, wait 
for menu," you need to start sending 
information to the printer until enough 
buffer space is available for more down- 
loading. 

After you have assembled the hard- 
ware project, you are ready to test the 
program and your printer selector/ de- 
selector. To prepare for testing, turn on 
the print buffer CoCo and load in 
Printbuf. Next, make all connections as 
shown in Figure 1. After you run it 
following the instructions I've given, 
you will be looking at the menu. From 
the menu, press D (download). Now on 
your main computer type in the follow- 
ing: 

10 POKE 150,1 'SET BAUD RATE TO 

9S00 
20 PRINTB-2,"NUW IS THE TIME TO 

TEST MY G4K PRINTER BUFFER" 
30 GOTO 20 
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The Best Money Can Buy . . . 
HDS Floppy Drive Controller Board 



r 





. T Wold Plated Edge Cards 
^Dual Selectable ROM Sockets 

' Compatible with COCO I & II 

" 120 Day Warranty 

' Double and Single Density 



Reduce your I/O errors with the Hard Drive Specialist 
Floppy Drive Controller for the Color Computer. Gold edge 
card connectors, advanced design, and the absence of 
potentiometers make it the best available. Our newest ver- 
sion controller allows the use of either (two 24 pin ROMS), 
or (one 24 pin and one 28 pin ROM). Using this board 
with the standard Radio Shack ROM gives you 100% com- 
patibility with all Radio Shack software. 
Completed and Tested Board 

with Radio Shack ROM $99. 

(Includes Case, and DOS Instructions) 

Completed and Tested Board without ROM . . . $79. 

(Includes Case) 

Bare Board with Instruction manual $30. 

Parts Kit For Bare Board without ROM $30. 

Radio Shack ROM (current version) $20. 

Radio Shack ROM 1.0 $40. 



Ordering Information 

Use our WATS line to place your order via Visa. MasterCard, or Wire Transfer Or 
mail your payment directly lo us. Any non - certified funds will be hold until proper 
clearance is made. COQ orders are accepted as wall as purchase orders from 
government ag6naes, Most items are shipped off the shell with (ha exception of hard 
drive products thai are custom built UPS ground is our standard means of shipping 
unless otherwise speciliod Shipping costs are available upon request 



Drive 0SS/DD $150. 

WHILE SUPPLY LASTS! 

Drive Complete v $199. 

Drive 1 Complete $129. 

Drive & 1 Dual Drive $319. 



HARD DRIVE SPECIALIST 



1-713-480-6000 
Order Line 1-800-231-6671 
16208 Hickory Knoll 
Houston, Texas 77059 



Next, run this program on the main 
computer and, as it is running, the 
buffer computer should be displaying 
on the screen what you are sending it. 
As the buffer computer is being filled 
up, the buffer indicator (F>»»E) 
should be losing some of its >'s. If none 
of this is happening, you probably have 
a wiring error between the main com- 
puter and the buffer computer. 

Soon after the last > is gone, "Buffer 
full alarm, please wait for menu" is 
displayed briefly. When the menu re- 



turns, press C so you can exit the print 
program on the main computer by 
pressing the BREAK key. Next, press P 
on the buffer computer to print the 
contents on the printer. 

If all your connections are correct, 
your printer should start. If it does not, 
check the wiring. If you do not want to 
build the project yourself and prefer 
that I build it, send $38 to Emmett 
Lewis Jr., 4530 Hogan, Corpus Christi, 
TX 78413. 1 will include Print buf on 
tape or disk (you choose) and the 



completed printer selector/ de-selector 
ready to use (with batteries). 

Now you have good reason to buy 
that extra CoCo. Also, check want ads 
for a good bargain. As prices continue 
to fall however, the best bargain might 
be a new CoCo from Radio Shack. 
( Questions about this program may be 
directed to the author at 4530 Hogan, 
Corpus Christi, TX 78413. 512-855- 
0151. Please enclose an SASE for a 
reply when writing.) □ 




The listing: PRINTBUF 

10 CLS 

20 PRINT"********************" 
30 PRINT" ******PRINTBUF******" 
40 PRINT "*** ***************** •' 

50 PRINT"****WRITTEN BY******" 

60 PRINT"********************" 

70 PRINT" *EMMETT M. LEWIS JR*" 

80 PRINT"********************" 

90 S = 4096 

100 E = 5300 

110 X = 5200 

120 FOR A = S TO E 

130 READ D$ 

140 v = VAL("&H"+D$) 

150 POKE A,V 

160 NEXT 

170 CLS: PRINT" BECAUSE THE PRINT 

ER IS SELECTED AND DESELECTED US 

ING A RELAY, SOMETIMES ERRORS AR 

E RECEIVED (NO MORE THAN 1 OR 2 ) 

. IF YOU ARE EXPERIENCING ERRORS 

, THEN YOU MAY ELECT TO SEND A ' 

DELETE LAST CHARACTER SENT TO PR 

INTER CONTROL CODE ■ . " 

180 PRINT" FOR SOME PRINTERS THE 

CODE IS 127. PLEASE REMEMBER IF 

YOU CHOOSE TO HAVE A CODE SENT ( 

3 MAX.) , IT OR THEY ARE SENT EAC 

H TIME YOU PRESS P (P=PRINT OUT 

CONTENTS OF BUFFER) " 

190 PRINT" DO YOU WISH TO SEND AN 

Y CONTROL CODES TO THE PRINTER"; 

:INPUTA$:IF A$="N"THEN230 



200 INPUT"THE FIRST CONTROL CODE 

";A:POKE&H1002,A 

210 INPUT"THE SECOND CONTROL COD 

E, IF NONE REQUIRED, ENTER 0";A: 

POKE&H1003,A 

2 20 INPUT" PLEASE INPUT THE THIRD 

CONTROL CODE TO BE SENT TO THE 
PRINTER, IF NONE REQUIRD ENTER 
";A:POKE&H1004,A 
230 INPUT"*DO YOU NEED TO CHANGE 

THE DOWNLOADING BAUD RATE? IT I 
S SET FOR 9 600 BAUD. " ;A$ : IF A$= 
"N"THEN 2 40 ELSE GOSUB 2 60: POKES 
H1006,A 
240 INPUT"***IS YOUR PRINTER SET 

FOR 9600 BAUD" ;A$:IFA$="Y"THEN 
2 70ELSE GOSUB 2 60 : POKE&H1008 , A: G 
OTO270 

2 50 GOTO 2 70 

2 60 INPUT "PLEASE INPUT THE NUMBE 
R FOLLOWING THE BAUD RATE TO SEL 
ECT THAT BAUD RATE. (EX, TO SELE 
CT 600 BAUD ENTER 87) 300=1 
80 , 600=87 , 1200=41, 2400=18 ,4800=6 
,9 600=1"; A: RETURN 

2 70 INPUT" DO YOU WISH TO SAVE PP. 
OGRAM ?";A$:IF A$="N"THEN EXEC 5 
200 

280 INPUT"SAVE TO TAPE OR DISK" ; 
A$:IF A$="DISK" THEN SAVEM"PRINT 
BUF/BIN" , &H1000 , 5300 , 5200 
290 IF A$="TAPE"THEN 300 ELSE 28 



300 CSAVEM" PRINTBUF" , 4096 , 5300 , 5 

200 

310 EXEC5200 

3 20 END 

330 DATA 20,07,00,00,00,00,01,00 
340 DATA 01,4F,B7,FF,40,B7,FF,DF 
350 DATA 1A,50,10,CE,06,2C,8E,06 
360 DATA 40,BF,03,ED,BF,03,F1,BF 
370 DATA 03,EF,17,03,6C,B6,FF,21 
3 80 DATA 84 / F7,B7,FF,21,8E,01,36 
390 DATA 10, 8E, 04, 80, 17, 00, 37, BD 
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400 


DATA 


02,98,CC,F7,01,BD,03,D7 


670 


DATA 


9E, 05, 12, 12, 12, 12, 30, IF 


410 


DATA 


10,27,01,93,CC,FB,04,BD 


680 


DATA 


26,FC,39,BE,03,F3,26,0A 


420 


DATA 


03 , D7 , 10 , 27 , 01 , 94 , CC, FE 


690 


DATA 


3 4, 02, BD, 02, 98, 35, 02, 8E 


430 


DATA 


04,BD,03,D7,10,27,01,A5 


700 


DATA 


01,A9,30,1F,BF,03,F3,39 


440 


DATA 


CC,EF,01,BD,03,D7,10,27 


710 


DATA 


04,00,13,88,13,88,20,44 


450 


DATA 


00,2A,CC,DF,01,BD,03,D7 


720 


DATA 


3D,44,4F,57,4E,4C,4F,41 


460 


DATA 


10 , 2 7 , 2 , D9 , 20 , CC , A6 , 80 


730 


DATA 


44,20,46,52,4F,4D,2,0,4D 


470 


DATA 


27,0C,8D,04,A7,A0,20,F6 


740 


DATA 


41,4 9,4E,20,43,4F,4D,50 


480 


DATA 


8 1, 40, 24, 03, 8B, 40, 39, 81 


750 


DATA 


55, 54, 45, 52, 2E, 20, 20, 52 


490 


DATA 


61, 24, 01, 39, 80, 20, 39, BD 


7 60 


DATA 


3D, 52, 45, 53, 45, 54, 20, 4F 


500 


DATA 


02,E6,20,96,BD,03 / 91,8E 


7 70 


DATA 


52,20,52,45,53,54,41,52 


510 


DATA 


04, 20, 8 6, 44, A7, 84, BF, 01 


780 


DATA 


54, 2C, 20, 45, 52, 41, 53, 45 


520 


DATA 


30,BD,02,98,5F,F7,FF,20 


790 


DATA 


20,41,4C,4C,20,20,20,50 


530 


DATA 


8 6,DF,B7,FF,02,B6,FF,00 


800 


DATA 


3D,50,52,49,4E,54,20,4F 


540 


DATA 


84,02,27,DB,F6,FF,22,57 


810 


DATA 


55,54,20,43,4F,4E,54,45 


550 


DATA 


25,EE,21,5C,4F,34,02,C6 


820 


DATA 


4E, 54, 53, 20, 4F, 4 6, 20, 42 


560 


DATA 


08,8D,4F,21,53,12,12,B6 


830 


DATA 


55,4 6,46,45,52,20,20,43 


570 


DATA 


FF,22,47,66,E4,5A,2 6,F1 


840 


DATA 


3D, 43, 4C, 45, 41 ,52, 20, 4 6 


580 


DATA 


3 5,02,C6,02,F7,FF,20,BE 


850 


DATA 


4 6, 3 2, 30, 2C, 52, 45, 4C, 45 


590 


DATA 


03,F1,BC,03,EB,2 6,08,BE 


860 


DATA 


4 1,53, 45, 20, 50, 52, 49, 4E 


600 


DATA 


03, ED, BC, 03, EF, 27, 05, 30 


870 


DATA 


54, 20, 53, 55, 42, 2E, 20, 45 


610 


DATA 


01,BC,03,EF,10,27,02,B6 


880 


DATA 


3D, 45, 53, 43, 41, 50, 45, 20 


620 


DATA 


A7 , IF , BF , 03 , Fl , 8D, 2C , BE 


890 


DATA 


54, 4F, 20, 42, 41, 53, 49, 43 


630 


DATA 


01,30,BD,00,78,8C,05,FF 


900 


DATA 


20,2A,4 3,4F,4C,44,20,53 


640 


DATA 


2 3,03,8E,04,20,A7,80,C6 


910 


DATA 


54, 4 1,52, 54, 2A, 20, 00, 5F 


650 


DATA 


AF,E7,84,BF,01,30,8D,02 


920 


DATA 


F7,FF,20,C6,43,F7,04,00 


660 


DATA 


0E,9C,10,21,00,02,8D,00 


930 


DATA 


0E,22,8 6,00,B7,FF,20,8 6 
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THE RAINBOW'S 

"One-Liner Contest 

'has now been expanded 

to include programs of 

either one or two lines. This 

means a new dimension and new 

opportunity for those who have "really 

neat" programs that simply just won't fit in 

one line. 

Here are the guidelines: The program must 
work in Extended basic, have only one or two 
line numbers and be entirely self-contained — 
no loading other programs, no calling ROM 
routines, no poked-in machine language code. 
The program has to run when typed in directly 
(since that's how our readers will use it). Make 
sure your line, or lines, aren't packed so tightly 
that the program won't list completely. Finally, 
any instructions needed should 
be very short. 

Send your entry 
(preferably on cassette) to: 




"XPNDR2 and SuperGuide - 
an Ideal Expansion Card Set" 



- RAINBOW 2/86 
HARDWARE REVIEW 




RAINBOW 



XPNDR2 S39.95 each or 2/S76 
This prototype card features a 40 pin 
connector for projects requiring an on- 
line disk system or ROM paks. The 
CoCo signals are brought out to wire- 
wrap pins. Special gold plated spring 
clips provide reliable and noiselree 
disk operation plus solid support for 
vertical mounting of the controller. The 
entire 4.3*7 inch card is drilled for ICs. 
Assembled, tested and ready to run. 

XPNDR1 S19.95 each or 2/S36 
A rugged 4.3-6.2 Inch bare breadboard 
that brings the CoCo signals out to 
labeled pads Both XPNDR cards are 
double-sided glass/epoxy, have gold 
plated edge connectors, thru-hole 
plating and are designed with heavy 
power and ground buses. They're 
drilled for standard 3 and 0.6 inch 
wide dual in-line wirewrap sockets; 
with a 0.1 inch grid on the outboard end 
for connectors. 

SuperGuide S3.9S each 
Here is a unique plastic insert that 
aligns and supports printed circuit 
cards in the CoCo cartridge port. Don't 
forget to ORDER ONE FOR YOUR 
XPNDR CARDS 



Included with each XPNDR card 
are 8 pages of APPLICATION 
NOTES to help you learn about 
chips and how to connect them lo 
your CoCo. 



B 



To order or for technical informa- 
tion call: 

(206) 782-6809 
weekdays 8 a.m. to noon 
We pay shipping on prepaid orders. 
For immediate shipment send 
check, money order or the number 
and expiration dateot your VISA or 
MASTERCARD to: 



ROBOTIC MICROSYSTEMS 

BOX 30807 SEATTLE. WA 98103 
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940 DATA 52, B7, 04, 00, BE, 03, ED, BF 

950 DATA 03,F1,BF,03,EF,0E,22,27 

960 DATA 03,BD,02,43,39,BD,03,E2 

970 DATA 8E,00,00,BD,02,93,C6,50 

980 DATA F7,04,20,96,02,8D,E8,96 

990 DATA 03,8D,E4,96,04,8D,E0,BE 

1000 DATA 03,EF,BC,03,EB,26,03,B 

E 

1010 DATA 03,ED,BC,03,F1,10,27,F 

D 

1020 DATA F9,A6,80,BF,03,EF,8D,1 

3 

1030 DATA BD,01,1B,86,DF,B7,FF,0 

2 

1040 DATA B6,FF,00 / 84,02,10,27,F 

D 

1050 DATA E1,20,D4,8D,3F,5F,8D,3 

E 

1060 DATA C6,08,34,04,5F,44,59,5 

8 

1070 DATA 8D,34,35,04,5A,26,F3,8 

D 

1080 DATA 2B,10,21,FE,B3,10,21,F 

E 

1090 DATA AF,10,21,FE,AB,10,21,F 

E 

1100 DATA A7,10,21,FE,A3,10,21,F 



Submitting Material 
To Rainbow 



Contributions to THE RAINBOW are welcome from 
everyone. We like to run a variety of programs that 
are useful/helpful/fun for other CoCo owners. 

Program submissions must be on tape or disk and 
it is best to make several saves, at least one of them 
in ASCII format. We're sorry, but we do not have time 
to key in programs. All programs should be supported 
by some editorial commentary explaining how the 
program works. Generally, we're much more inter- 
ested in how your submission works and runs than 
how you developed it. Programs should be learning 
experiences. 

We do pay for submissions, based on a number of 
criteria. Those wishing remuneration should so stare 
when making submissions. 

For the benefit of those who wish more detailed 
information on making submissions, please send a 
self-addressed, stamped envelope (SASE) to: Submis- 
sions Editor, THE RAINBOW, The Falsoft Building, P.O. 
Box 385, Prospect, KY 40059. We will send you some 
more comprehensive guidelines. 

Please do not submit programs or articles currently 
submitted to another publication. 



E 

1110 

E 

1120 

2 

1130 

F 

1140 

7 

1150 

9 

1160 

1 

1170 

1 

1180 

1 

1190 

F 

1200 


1210 

F 

1220 

7 

1230 

E 

1240 

7 

1250 

3 

12 60 
E 

1270 
C 

1280 
7 

1290 
C 

1300 
3 

1310 
2 

1320 
4 

1330 
F 
1340 



1350 

5 

13 60 
F 

1370 
1 

1380 
D 

1390 
7 



DATA 9F,10 / 21,FE,9B,10,21,F 
DATA 97,10,21,FE,93,F6,FF,2 
DATA 54,25,FA,39,C6,02,F7,F 
DATA 20,8D,00,9E,07,8C,9E,9 
DATA 7E, 02,93, 30, IF, 26, FC, 3 
DATA 8E,04,00,CC,60,60,ED,8 
DATA 8C,04,1F,25,F9,BE,03,F 
DATA CC, F8, 70, BC, 03, EF, 25,1 
DATA 2 7,15,FC,03,F1,B3,03,E 
DATA 34,06,CC,F8,70,A3,E1,2 
DATA 06,FC,03,EF,B3,03,F1,1 
DATA 01, 86, 46, 10, 8E, 04, IF, B 
DATA 04,00,86,45,A7,A4,86,7 
DATA 8C, 08, 48, 23, 08, 30, 89, F 
DATA B8,A7,A2,20,F3,39,8E,0 
DATA 24,10,8E,05,E0,17,FD,7 
DATA CC,FD,08,BD,03,D7,27,0 
DATA CC,BF,02,BD,03,D7,10,2 
DATA FD,7C,20,EC,BE,03,F1,B 
DATA 03,EF,10,27,FD,70,BC,0 
DATA ED,26,03,BE,03,EB,A6,8 
DATA 81,0D,26,EB,86,20,A7,8 
DATA BF,03,F1,39,52,45,4D,4 
DATA 56,45,20,40,41,53,54,2 
DATA 43,41,52,52,49,41,47,4 
DATA 20, 52, 45, 54, 55, 52, 4E, 3 
DATA 20,59,2C,4E,00,BD,03,9 
DATA 8E,03,68,10,8E,04,E0,B 
DATA 00,6E,CC,FD,08,BD,03,D 
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1400 


DATA 


D 




1410 


DATA 


D 




1420 


DATA 


P 




1430 


DATA 







1440 


DATA 







1450 


DATA 


7 




1460 


DATA 







1470 


DATA 







1480 


DATA 


1 




1490 


DATA 







1500 


DATA 







1510 


DATA 


2 




1520 


DATA 


9 




1530 


DATA 


D 




1540 


DATA 


F 




1550 


DATA 


7 




1560 


DATA 


4 




1570 


DATA 


7 




1580 


DATA 


F 




1590 


DATA 


F 




1600 


DATA 


F 




1610 


DATA 







1620 


DATA 







1630 


DATA 


^ 




1640 


DATA 







1650 


DATA 







1660 


DATA 







1670 


DATA 







1680 


DATA 







1690 


DATA 



10,27,00,2B,CC / BF,02 / B 

03,D7,10,27,FC,BC,20,D 

2A, 2A, 2A, 2A, 2A, 20 , 20, 2 

41, 52, 45, 20, 59, 4F, 55, 2 

53, 55, 52, 45, 3F, 20, 20, 2 

20,2A,2A,2A,2A,2A,00,B 

FF,DE,86,03,97,71,7E,A 

27,8E,04,00,86,60,A7,8 

8C,06,00,2 6,F9,39,8D,F 

30,8D,00,14,10,8E,04,E 

BD , 00 , 6E , 8 6 , 0A , 8E , 00 , 

BD,02,93,4A,2 6,FA,0E,2 

42,55,46,46,45,52,20,4 

53,20,46,55,4C,4C,20,2 

20,57,41,49,54,20,46,4 

52,20,4D,45,4E,55,00,B 

FF,02,34,04,B6,FF,00,A 

E0,39,B6,FF,21,8A,08,B 

FF,21,39,FE,B0,FF,00,F 

00,FF,00,01,A8,FF,00,F 

00,FF,00,FF,00,FF,00,F 

E9,00,FF,00,FF,00,FF,0 

FF,00,FF,00,FF,00,FF,0 

FF,00,FF,00,FF,00,FF,0 

FF,00,FF,00,FF,00,FF,0 

FF,00,FF,00,FF,00,FF,0 

FF,00,FF,00,FF,00,FF,0 

FF,00,FF,00,FF,00,FF,0 

FF,00,FF,00,FF,00,FF,0 

FF,00,FF,00,FF,00,FF,0 



J3 

1700 


1710 


1720 

7 

1730 

% 

1740 


1750 


1760 


1770 


1780 


1790 


1800 


1810 


1820 


1830 



DATA FF,00,FF,00,FF,00,FF,0 
DATA 1A,50,8E, 10,00, 10, 8E,0 
DATA 00,A6,80,8C,14,4F,10,2 
DATA EB,9E,A7,A0,20,F3,FF,0 
DATA FF,00,FF,00,FF,00,FF,0 
DATA FF,00,FF,00,FF,00,FF,0 
DATA FF,00,FF,00,FF,00,FF,0 
DATA ED,00,FF,00,FF,00,FF,0 
DATA FF,00,FF,00,FF,00,FF,0 
DATA FF , 00 , FF , 00 , FF , 00 , FF , 
DATA FF,00,FF,00,FF,00,FF,0 
DATA FF,00,FF,00,FF,00,FF,0 
DATA FF,00,FF,00,FF,00,FF,0 
DATA FF,00,FF,00,FF /» 



THE SOFTWARE HOUSE 

A DIVISION OF DATAMATCH. INC. 



PROGRAMMERS 
D I SKS 



WOW ! 



± t& FOR * 5 - 95 

5121 FOR *2S- 95 

10 FOR *^**5>_ 95 

M/SLEEVES, LABELS, H.P. TABS 

HADE IN USA! CERTIFIED ERROR FREE. 

5 YEAR WARRANTY 



FLIPPY DISKS 


10/*8.95 


FACTORY PUNCHED 


- USE BOTH SIDES 




PRINTER RIBBONS 






EPSON MX/RX/FX 70/80 


S5.00 Ea. 




6/528.00 


RED, GREEN. BROWN, BLUE 


S6.00 Ea 




4/522.00 


GEMINI 10/10X/SG10 


S2.00 Ea 




DOZ/S22.00 


GEM/OKI COLORS 


S3.00 Ea. 




4/S 10.00 


OKIDATA 80/82/92/93 


S2.00 Ea. 




DOZ/S22.00 


C.ITOH.NEC 8023, APPLE 








DMP/IMAGEWRITER 


$6.00 Ea 




6/534.00 


RED. GREEN. BROWN, BLUE 


S6.50 Ea 




4/525.00 


ALL ITEMS 100% GUARANTEED 





Add S2.50 S/H in U.S.A. ■ Canada Add $3.50 + S1.00/LB 
Michigan Residents Add 4% Sales Tax 
Send Check/Money Order Payable to: 
_ THE SOFTWARE HOUSE 
23552 PLYMOUTH, REDFORD, MI 48239 

(313) 255-9850 

Send Card Number & Exp. Dale Min. Charae Order $20.00 
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RAINBOW 

i- ' ■> 

Give us your best: Join the ranks of these courageous CoCoists in showing the Color Computer world 
your high score at your favorite micro-diversion. We want to put your best effort on record in THE RAINBOW'S 
"Scoreboard" column. All entries must be received 60 days prior to publication. Entries should be printed 
— legibly — and must include your full name, address, game title, company name and, of course, your high 
score. Each individual is limited to three score entries per month. Send your entries to Scoreboard, c/o THE 
RAINBOW. The "Rainbow Scoreboard" is now a bimonthly feature. 

For greaser convenience, your high scores may also be sent to us through the MAIL section of our Delphi 
CoCo SIG. From the CoCo SIG> prompt, pick MAIL, then type send and address to: EDITORS. 



* Current Record Holder 



Shutout 



'•••••••••••••••••••••••••••••-A 



ADVANCED STAR'TRENCH (THE RAINBOW, 7/86) 
3,975 *David Schallet, Clarkston, WA 
3,960 Maurice MacGarvey, Dawson Creek, 

British Columbia 
3,800 Shaw Muniz, Los Angeles. CA 
2,600 John Fredericks, Kalkaska, Ml 
2,300 Blaln Jamieson, Kingston, Ontario 
ALPINE SLOPES (THE RAINBOW, 12/85) 
10,938 *Chad Lung, Lake Lenore. 

Saskatchewan 
6.851 Myriam Ferland, Trois-Rivieres. 

Quebec 
4,656 Maurice MacGarvey. Dawson Creek. 

British Columbia 
4,254 Todd Wirtz, Midland. Ml 
4,064 Minesh Patel, Benton. AR 
AMPHIBIA (THE RAINBOW, 8/85) 

1 1 ,682 *Chris Curtis, Walling, TN 
ANDRONE (Radio Shack) 

71,035 *Quinr Grantor. Bismark, ND 
63.600 Maurice MacGarvey, Dawson Creek. 

British Columbia 
58,200 Scott Bellman, Bettendort. IA 
57,880 Melessia McWhirter, Winter Haven. 

FL 
57.300 Mitch Hart. Seattle, WA 
AREX (Adventure International) 

69,500 *Jean-Francois Morin, Loreltevllle. 
Quebec 
BAG-IT-MAN (Aardvark) 

466,000 *Aaror Solak, Glen Flora, Wl 
BEAM RIDER (Spectral Associates) 
9.999,310 *Gilles Velllelte, La Tuque. Quebec 
6,871,020 Lise Lapointe, La Tuque, Quebec 
6,004.000 James Oakley. Nashville, TN 
3,286,700 Paul Bivens. Washington. PA 
3.042.470 Evelyn Thompson, Nederland, TX 
BIOSPHERE (Radio Shack) 

21,372 *Randall Edwards, Dunlap, KS 
10,056 Carlos Gameros. El Paso, TX 
3,101 Vincent Knight, Harvey, IL 

2,491 Robert do Lambert, Everett, WA 

391 Oanny Perkins. Clifton Forge, VA 

BLACK SANCTUM (Mar* DafaJ 

160 *Roger Ranee. Charleston, SC 
BOUNCING BOULDERS (Diecom) 

36 *Andre Grenier. Quebec. Canada 
BOXING (THE RAINBOW. 8/86) 

995 ^Jonathan Wanagel. Freeville, NY 
775 Quinn Grantor. Bismark, ND 
720 Konnie Siewierski, Schaumburg, IL 
620 John Dunne Jr., Piltslleld, NH 
545 Duke Davis. Sandwich, IL 
520 Minesh Patel. Benton. AR 
BUBBLE WARS (THE RAINBOW. 2/86) 

76,200 *Eugene Paoli, Wilmington. DE 
75.100 Rachael Richards. Blakesloe, PA 
43.150 Shirley Kirk, Elgin, OR 
37,957 Odone Kirk, Elgin. OR 
36,400 Jell Miller, Bronson, Ml 
BUGS(T. Edwards) 

438,850 ^Christian Grenier. Quebec. Canada 
BUZZARD BAIT (Ton) Mix) 

100,200 *Jason Maxwell, Manchester, TN 



CANDY CO. (inlracoior) 

225.083 #Steven Clendenning, Titasvllle, FL 
CANYON CLIMBER (Radio Shack) 

150,200 *Brian Lewis. Baltimore, MD 
125,000 Tony Fortino, Tacoma, WA 
112,700 Jesse Binns. Phoenix. AZ 
104.000 Steven Honigman. Waggoner, IL 
75,000 Abby Gordon, Philadelphia. PA 
72,800 Terry Cockerllno, Cornwall. Ontario 
68,300 Art Pancoast, North Huntingdon, PA 
63.800 Keith Murdough, New Boston. NH 
CASTLE (THE RAINBOW. 6/86) 

202,659 *Brendan Powell, La Grande. OR 
116,606 Darryn Bearisto, Now Carlisle, 

Quebec 
93,672 Maurice MacGarvey, Dawson Crook, 

British Columbia 
55,239 John Broussard Jr.. Alexandria. LA 
38,217 John Fredericks, Kalkasks, Ml 
1 1,802 Todd Masek, Wicklille, OH 
CATCH IT (Family Computing) 

25.465 *James Donogan, Saugerties, NY 
CHAMBERS (Tom Mix) 

182.300 *Blossom Mayor, East Greenbush. NY 
CLOWNS AND BALLOONS (Radio Snack; 
48.740 #Trent Travis, Dresden. TN 
COLOR BASEBALL (Radio Shack) 

999-0 *«Enk Munson. Tucson. AZ 
998-0 *«Eugene Paoli, Wilmington, DE 
866-1 Ghislain Chillis, Trols-Rlvieres. 

Quebec 
814-1 Frank D'Amato, Brooklyn, NY 

814-0 »John Licata, Richton Park, IL 
653-0 »Danny Perkins, Clifton Forgo, VA 
COLORPEDE (Inlracoior) 

449,594 *John Haldane, Tempe, AZ 
35.650 Blake Cadmus. Reading, PA 
COMMANDO (THE RAINBOW, 2/86) 

5,816 AEugene Paoli, Wilmington, DE 
DALLAS OUEST (Radio Shack) 

87 *David & Shirley Johnson, 

Leicester. NC 
87 *Paul Summers, Orange Park. FL 
87 *Douglas Bell, Duncan. OK 
89 Chris Picho, White Rock. British 

Columbia 
89 Milan Parekh, Fullerton. CA 
89 Andrew Urquhart. Metairie, LA 

89 Steve Zemailis, Howell. Ml 

90 Roy Grant. Toledo, OH 

91 John Semonin, Akron, OH 
DEATH TRAP (Soft Sector) 

95.577 *Vivian Buterin. St. John, MO 
94.729 Douglas Pardon. Brigham City. UT 
DEMOLITION DERBY (Radio Shack) 

210,700 *Duko Davis. Sandwich. IL 
DEMON ATTACK (Imagic; 

244,110 *Gregory Day. Holslein. Ontario 
125,520 Mike Watson. Northville, NY 
81,635 Tim Glonn. Haverlown. PA 
78.010 Lisa Nebel. Phoenix, AZ 
64.195 Jon Ruhnow, Duncanville, TX 
55.676 Chris Brokaw. Monlicello. IA 
50.120 Brian Abeling, Monlicello, IA 



DESERT GOLF (Spectral Associates) 

-14 * Terry Krueger. Maple Ridge. British 
Columbia 
DESERT RIDER (Radio Shack) 

65.570 *Don Ball. Chicago. IL 
56.918 Anthony Collins. New Caney. TX 
DEVIL ASSAULT (Tom Mix) 

623,550 *Oale Krueger. Maple Ridge. British 
Columbia 
75,000 Blake Cadmus, Reading. PA 
DOODLEBUG (Compulerware) 
6.698,490 * Andre Grenier. Quebec. Canada 
3,637,720 Bill Novobilsky. Lanoka Harbor. NJ 
3.010.000 Blake Cadmus. Reading, PA 
DOUBLE BACK (Radio Shack) 
2,586.300 *Eugene Roosa, Stone Ridge. NY 
1,618.400 Diane Guernon. Montreal. Quebec 
450.600 Michael Brennan. Calgary, Alberta 
159.610 Blake Cadmus. Reading, PA 
1 12.890 MaryAnn Powers. Carmichael. CA 
64.100 Geoltrey Hall, Casselbury. FL 
52,840 Joel MacNeil, Needham. MA 
50.040 Brad Larkin, Sterling Hts., Ml 
45.470 Thomas Hulit, Sweet Grass. MT 
DOWNLAND (Radio Shack; 

98,985 *Karl Gullilord, Summerville. SC 
97.740 Stephane Deshaies. Beloeil, Quebec 
89,490 Neil Edge, Williston, FL 
77.254 Tom Audas, Fremont, CA 
73.346 Jean-Francois Morin. Lorettevllle. 

Quebec 
70.142 Chris Goodman. Baltimore, MD 
68,142 Cooper Valentin, Vavenby, 

British Columbia 
67.721 Keith Yampanis, Jattrey, NH 

62.442 Eddie Lawrence, Pasadena, 

Newfoundland 
55,300 Patrico Gonzalez, Buenos Aires, 

Argentina 
49.500 Danny Perkins. Clifton Forge, VA 
40,360 Jesse Binns, Phoenix, AZ 
34,424 Andrea Mayfield, Melbourne, FL 
DRAGON FIRE (Radio Shack; 

125.000 *Dan Lillmann. Andover, MA 
123,120 Rupert Young, Sheffield. MA 
46.713 Gilles Gagne, Sillery, Quebec 
33.676 Nalhanael Heller. Kenner, LA 
32,464 Garrett Stangel. Milwaukee. Wl 
ENCHANTER (Inlocom) 

400/212 *Charly Rushing, Santa Rosa, CA 
400/621 Brad Wilson, Lithla Springs, GA 

400/431 Truman Bryerton, Jr., B.Ville, NY 

185/186 David Tarleton. Williamsburg, VA 
80/1 1 5 Scott Bellman, Bettendort. IA 
FANGMAN (Tom Mix) 

2,946.460 *Andre Grenier. Quebec, Canada 
FIGHTER PILOT (Saguaro Software) 

75,900 *Blake Cadmus, Reading. PA 
FIRE COPTER (Adventure International) 

43,260 *Rodrigo Maldonado. Whittier, CA 
FIRESTORM (THE RAINBOW. 1/86) 

3.505 *Blake Cadmus. Reading, PA 
FROGGIE ( Spectral Associates) 

55,190 *Scott Jamison, Billerica, MA 



• •••••••••••••••••••••••••"AT*** 
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GAL AGON /Spectral Associates) 

169.410 *Danny Dunne. Pittslield. NH 
116,280 Scott Jamison, Billerica, MA 
104,870 Chris Dunne. Pittslield. NH 
73,520 Neil Edge. Willislon. FL 
71.220 Debora Edwards, Wembley, Alberta 
GANTELET (Dlocom Products) 
20,921.490 *Randall Edwards. Dunlap. KS 
2.512.620 Jason Steele, Pensacola, FL 
2,115,790 Jerry Honigman, Waggoner. IL 
2.01 1.200 Jerry Colbert, Bakerslield. CA 
1 , 1 08,750 Robert Fox, Dover, OH 
1.081,530 Michael Wallace, Bronx. NY 
1,025.900 John Hotaling. Duanesburg. NY 
1 ,016,050 Edward Swatek. Chicago. IL 
933.740 Yvan Langlois. Laval. Quebec 
932.660 Brian Hunter, South Berwick. ME 
787.780 Brad Wilson, Lithia Springs, GA 
685,840 Karen Jessen, Cleveland, OH 
456,220 Scott Jamison, Billerica, MA 
410,868 Billy Helmick. Independence. KY 
GATES (THE BAIN80W. 8/86) 

600 *Minesh Patel, Benton, AR 
HOME ROW BOMBER (THE RAINBOW, 1787) 

6,384 *Timothy Hennon, Highland, IN 
JUNIOR'S REVENGE (Computerware) 

1 .500.300 * Alex Abraham, Atlanta. G A 
KAMAKAZIE KAR (THE RAINBOW. 8/85) 

144.85 *Chris Piche. White Rock, British 

Columbia 
83.85 Dan Dawson, Fort Wayne. IN 
75.75 Tim Glenn, Havertown, PA 
THE KING (Tom Mix) 

3.824.280 *Andre Grenier, Quebec, Canada 
KNOCK OUT /Diecom Products) 

181,085 *Rush Caley, Port Orchard. WA 
168.385 John Licata, Richton Park. IL 
151,850 Christian Grenier, Quebec, Canada 
149,190 Daniel Lesage. Laval. Quebec 
1 38. 1 50 Nick Pettibone. St. Louis. MO 
LANCER tSpectrat Associates) 

99.700 *Oavid Kaulfman. South Haven, Ml 
LUNCHTIME (Novasott) 

42,025 *Steve Place, Webster. NY 
MICROBES (Radio Shack; 

121,330 *Minesh Patel, Benton. AR 
77,700 Brian Abeling. Monticello. IA 
MINIGOLF (THE RAINBOW. 5/86) 

23 #Wiltrid Sloan, Newport-on-Tay, 

Scotland 
25 Billy Helmick. Independence, KY 
32 Chris Banas. North West Territories, 
Canada 
MISSION: F-16 ASSAULT (Diecom Products) 
468,750 *Karen Jessen. Cleveland, OH 
127,550 Michael Heitz, Chicago, IL 
49,630 Edward Swatek, Chicago. IL 
45,500 Chuck Moroy. Bakerslield, CA 
38.305 Richard Nieves. Mayaguez, 

Puerto Rico 
36.800 Blake Cadmus. Reading. PA 
MODULE MAN /Spectral Associates) 

166.500 *James Church. Polnte Claire. Quebec 
MUDPIES(Mich7"ron) 

286.600 *Chuck Morey, Bakerslield. CA 
ONE-ON-ONE (Radio Shack) 

1,204-0 *«Chad Johnson, Benton, AR 
1.160-0 "Mark Lang, Downleville, CA 
1.132-23 Dan Liltmann. Andover, MA 
1 ,086-1 7 David Blankenship. Princeton, WV 
1 .078-2 Toby Jacobs, Bellelontaine, OH 

1.064-16 Tim DeJong. Rock Valley. IA 
OPERATION FREEDOM (THE RAINBOW. 8/85) 

15.343 *Mallhew Knight. Yakima, WA 
PAPER ROUTE /Diecom Products) 
1,059.350 *David Kaullman. South Haven, Ml 
720,560 Konnie Siewierski, Schaumburg, IL 
531.600 Larry Shelton, Marion, IL 
511.000 David Kaullman, South Haven, Ml 
337.550 Lawrence Elman, Smithtown, NY 
249,000 Jami Foster. Maryville. TN 
151.800 Carl Sylvaln. St.-Frederic Beauce, 
Quebec 
13.400 Abby Gordon. Philadelphia. PA 



PEGASUS AND THE PHANTOM RIDERS (Radio Shack) 

250,200 *Leon Kornblulh, Richlield. NJ 
197,500 Douglas Wilkinson, Jr., New Born, NC 
187,300 Mike Grant. Fresno. CA 
170,500 Rodrlgo Maldonado, Whittier, CA 
109,800 Mike Dyer, Lompoc. CA 
PITFALL II /ActMsion) 

199,000 *Pat Lenlhrum, Newark, DE 

199,000 *Kirk Lockhart. Waco. TX 

199,000 *Danny Perkins. Clifton Forgo. VA 
198.800 David Kardos, Colon ui. NJ 
198.252 Tom Audas. Fremont. CA 
196.012 Scott Mitchell. Rural Hall. NC 
194,320 Marc Reiter, Cincinnati. OH 
194,000 Michael Wallace, Bronx, NY 
192,550 Rodrigo Maldonado. Whittier, CA 
189,024 Christine Vollmer, Richmond Hill, NY 
PITSTOP II (Epyx) 

54 *Christopher Conley, 

North Attleboro. MA 

54 *Jamos Doty, Washougal, WA 

54 ^Bernard Florence. Croydon. Australia 

54 *Tom Maccarone. Swampscott. MA 

54 *Danny Perkins. Clifton Forge, VA 
45 Doug Sterner, New Albany. PA 
15 Randy Heckman, La Mirada, CA 
9 Walter Hearne, Pensacola, FL 
9 Jeff Maxwell, Lincoln. NE 

POLARIS /Radio Shack) 

151,125 *Gene Murphy. Ft. Worth. TX 
POLTERGEIST /Radio Shack) 

3,140 *Jesso Binns. Phoenix. AZ 
POOYAN /Datasolt) 
97.500.000 *Rich Fiore. Clemson. SC 
54.500,000 Carlos Gameros, El Paso, TX 
3,785,000 Ben Collins, Clemson. SC 
1 ,987.000 Jon Sowle, Sanford. FL 
1.546.000 Jason Maxwell, Manchester, TN 
1.253,200 Thomas Mayor, Brooklyn, NY 
401,300 Terry Heinz, Shreveport. LA 
POPCORN (Radio Shack) 

77.200 *Scolt Jackson, Doraville. GA 
Q-NERD (THE RAINBOW 5/84) 

58,510 *Duke Davis, Sandwich, IL 
QUIX (Tom Mix) 
8,407.772 *John Haldane. Tempe, AZ 
1 ,404,000 Curlis Goodson, Sao Paulo. Brazil 
1.003.104 Elisa Goodson. Sao Paulo. Brazil 
205.335 John Hotaling. Duanesburg. NY 
104,034 Christopher Conley, 
North Attleboro. MA 
RADIO BALL (Radio Shack) 
6,330,350 *Myrlam Ferland, Trois-Rivieres, 

Quebec 
4,510,740 Les Dorn, Eau Claire, Wl 
1,945.110 Dominic Deguire, St. Baslle, 

Quebec 
1,768,940 Brian Buss, Whitehall, PA 
1,631.750 David Del Purgatorio. Antioch, CA 
ROBOTTACK /Intracolor) 
2,122,150 *Ghislain Chillis & Michel Lossard. 

Trois-Rivieres. Quebec 
1.020.800 Ian MacLachlan, Bethany, Ontario 
975,850 Erik Huffman, Rochester Hills. Ml 
931,250 Keith Smith, Bethany, Ontario 
866,320 Richard Deane, Chicago. IL 
ROMMEL 3-D IMIchTron) 

670.300 *Edw,ird Swatek. Chicago, IL 
137,100 Stephana Deshaies, Beloeil, Quebec 
SANDWORM (THE RAINBOW, 8/86) 

308 *Tony Fortino. Tacoma, WA 
SHAMUS (Radio Shack) 

120.480 *Lynn Shrowsberry. Sunnyside, WA 
38.075 Kay Shrewsberry. Sunnyside. WA 
SHOCK TROOPER (Mar* Dala) 

321.405 *Chuck Morey, Bakerslield, CA 
301,538 Bernard Florence. Croydon, Australia 
52,700 Blake Cadmus, Roading. PA 
SIR EGGBERT JUMPER (THE RAINBOW, 8/85) 

2,630 *Brad Walker, Prince George, British 

Columbia 

1,660 John Austin. Clifton, TX 

568 Odene Kirk, Elgin, OR 



SKIING (Radio Shack) 

:44.25 *Tim North, Emporia. KS 
SLAY THE NERIUS (Radio Shack) 

339,742 #Curt Lebel. Sunrise, FL 
SPIDERCIDE (Radio Shack) 

3,820 *Eddie Lawrence. Pasadena. 

Newfoundland 
3.540 James Church, Pointe Claire, Quebec 
2,550 Charles Maflow. Briarwood, NY 
2,000 Mike Watson, Northville. NY 
1,740 Joel DeYoung, Manson, Manitoba 
STAR BLAZE /Radio Shack) 

10.000 * Aaron Sotak, Glen Flora, Wl 
9.350 Michael Shahan, Bloomlngton. IN 
8,750 J. Yosefkrinsky, Jerusalem, Israel 
8,750 Jon Larson, Sellgman, AZ 
8,750 Kent Pirkle, Cumming, GA 
STARLORD (THE RAINBOW, 8/86) 
2,747,355 *Frederick Lajoie, Middleton, 

Nova Scotia 

1,234,125 John Herbert, New Baltimore. Ml 

575.100 David Schaller, Clarkston. WA 

452,880 Brad Bansner, Wyomlssing. PA 

406,875 Mark Glover, Derby, NY 

STELLAR LIFE-LINE (Radio Shack) 

427,210 *Steven Smith, Matthews, NC 
397,680 Bill Novobilsky, 

Lanoka Harbor, NJ 
78,600 Don Johnson. Winnipeg. Manitoba 
58.580 Stefan Mecay, Auslin, TX 
49.900 Craig Fricke. Jacksonville. IL 
TEMPLE OF ROM /Radio Shack) 
1.592.100 *Sara Hunt. Gaithersburg, MD 
1,422,400 Timothy Bishop. Jacksonville. FL 
960.000 J. Yosefkrinsky. Jerusalem. Israel 
959.400 Sonya Hurst. Richmond, CA 
938.800 Christopher Romance, 

Massapequa Park, NY 
576,400 Aaron Sotak. Glen Flora. Wl 
TIME BANDIT /MichTron) 

102,010 *Mccheal Knight, Yakima. WA 
73,660 Mark Boisuert. Burstall. 
Saskatchewan 
TREASURE QUEST (THE RAINBOW, 11/86) 
18,295 *Shaw Muniz, Los Angeles. CA 
14,415 David Bellinger, Caldwell, OH 
TUTS TUMB /Mark Data) 

45,000 *Blake Cadmus, Reading, PA 
VARLOC (Radio Shack) 

2,032 *Tony Harbin. Cullman, AL 
2,008 Philip Pulfinburger, Winchester, VA 
1,988 Randall Edwards, Dunlap. KS 
1.975 Bernard Florence, Croydon. Australia 
1,952 Lynn Shrewsberry. Sunnyside, WA 
VICIOUS VIC (THE RAINBOW, 7/86) 

10,489 *Karl Gulliford, Summervllle. SC 
6,294 Pel O'Neill, Nepean. Ontario 
4,643 Martha James, Swarthmore, PA 
3,240 Tony Fortino, Tacoma, WA 
2,626 Brad Bansner. Wyomlssing, PA 
THE VORTEX FACTOR /Mark Data) 

100/276 *Tommy Crouser, Dunbar, WV 
100/483 Rick & Brenda Stump, 
Laureldale. PA 
210 Paul Maxwell. Vancouver, 
British Columbia 
WRESTLE MANIAC /Diecom) 

39.086 *Billy Helmick, Independence, KY 
5,000 Chrislian Grenier, Quebec. Canada 
ZAXXON /Datasolt) 
2,061,000 *Byron Altord. Raytown, MO 
1.950.000 Blake Cadmus. Reading. PA 
1.300.500 Dan Brown, Pittslord. NY 
1,100.600 Andrew Urquhart, Metairie. LA 
253.400 Bob Dewitt, Blue Island. IL 
163,700 Daniel Bradlord, Birmingham, AL 
1 1 1 ,400 Jell Miller. Bronson. Ml 
72.800 Tom Maccarone. Swampscott, MA 
67,400 Carlos Gameros. El Paso. TX 
59,800 Garrett Stangel, Milwaukee, Wl 



— Jody Doyle 
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f In conjunction with the rainbow's Scoreboard, we offer this column 
of pointers for our game-playing readers' benefit. If you have some 
interesting hints, tips or responses to questions, or want help yourself, 

\we encourage you to write to the Scoreboard, c/o the rainbow. 



FEEDBACK 

Scoreboard: 

Thanks to Maurice MacGarvey for 
advice on Bedlam (March '87). He might 
also be interested to know thai there is an 
escape through one of Picasso's painted 
doors. 

He also enquired about Madness and 
the Minotaur. LOOK in every pit and every 
pool of water. When you get to the room 
with the "strange colored walls," turn vour 
lamp off and LOOK WALLS. 

Annette Clear 
San Diego, CA 



Scoreboard: 

In response to Ronnie Scott's letter 
about Zork /(March '87): To kill the thief, 
you must first give him the egg, and then 
kill him in the treasure room with the axe. 
Any help with Madness and the Mino- 
taur would be greatly appreciated. 

Chris Pond 
Mackinaw, IL 



Scoreboard: 

In response to the letter from David 
Solley (January '87): To find another 
entrance to the passage in Black beard's 
Island, go up the cliff and type MOVE SIGN. 
Then go in. In Vortex Factor, what's the 
number for the dial? How do you stop the 
water in the boat in Dallas Quest! 

Ian Renauld 
St. Eustache, Quebec 

Scoreboard: 

In reference to John Riddle's letter 
concerning Madness and the Minotaur 
(March '87): After revealing the ledge, try 
climbing it. The gem the packrat likes 
changes from game to game so try a 
different one. 

Here are a couple of tips on the game 
Zork I: The randomly placed pit in the 
maze hides a treasure. To get it, first jump 
it and then look at it. 

Jo Anne Minteer 
Pinellas Park. FL 



Major Stumbling Block 

Scoreboard: 

In Major tutor, I think I have gotten and 
done everything I can before the door with 
radiation, but every time 1 step in. I die. 
Also, what do you do in the Casino in the 
Interbank Incident'! 

David Harris 
Idaho Falls. ID 



Quandic Quandary 

Scoreboard: 

I need help on Level 2 of Preserve 
Quandic. 

Don Grey 
Austell, GA 

Beyond Level 9 

Scoreboard: 

Does anyone know the pokes to jump to 
the various levels of Novasoft's Gold 
Runner! 1 would like to see what comes 
after Level 9. 

Bill White 
Live Oak, FL 

Please Pass the Serpent 

Scoreboard: 

1 have had Pyramid for months but 
haven't been able to get past more than 10 
rooms before I meet a serpent that will not 
■ let me pass by. 

Normand Schafer 
Quesnel, British Columbia 

Foiled by Gargoyle 

Scoreboard: 

In Raaka-Tu, I have collected the food, 
the sword, the lamp, the candle, the bejew- 
eled lever and the golden idol — but I can't 
get past the gargoyle. 1 tried lighting the 
candle with the lamp (quickly), but I got 
killed by the smoke. 

Travis Stramer 
Bismarck, NJ 



Pool Your Resources 

Scoreboard: 

In Sands of Egypt, does the solution 
have something to do with the rain cover 
(in the pool)? 

Marshall Miller 
Oneonta, NY 

Safe Solution 

Scoreboard: 

How do you open the safe in Vortex 
Factor! 

Jason Thomas Wysokowski 
Rosell'e Park, NJ 

THUUDO-Beludd\ed 

Scoreboard: 

I've had a great deal of enjoyment with 
both rainbow Adventure books. Some of 
the games have been sources of help in my 
programming experiences. One Adventure 
has totally befuddled me, though - 
Tiwuno. I get stuck right after the shovel 
(or pickax) is found. 

Also, I've got a clue for Wizard's Castle. 
When you reach the cave that is locked and 
barred, type HELP and follow the hint 
given. 

John Beck 
Suit/and, MD 

Banishing Act 

Scoreboard: 

In Zork I, after you ring the bell and 
light the candles at the entrance to Hades, 
what do you do to banish the spirits? How 
do you open the grating in the forest? 

Here's a tip for Sands of Egypt: Feed the 
camel the dates. 

John C. Austin 
Clifton. TX 

Lost in the Woods 

Scoreboard: 

I have non-graphics versions of Black 
Sanctum and Calixto Island. In Black 
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Sanctum, all 1 can do is go to the cabin, 
explore it, leave and get lost in the woods. 
In Calixto Island, I can gel to the jungle 
edge, but no further. 

Emilie S. Bruchon 
Belmont. NC 



EXAMINE feature is useful in a few situa- 
tions. 

I can't get through the bronze doors or 
get out of the mine shaft in Dragon Black'. 
How do you use the scroll? 

Robert Perdock 
Centereach. NY 



impossible without a good cassette re- 
corder and tape. When danger arrives, you 
can CSflVE it at that spot and reload it if 
you get killed. 

Chris Nicholes 
Orem. UT 



Token Question 

Scoreboard: 

In Wishbringer, how do you keep every- 
thing from being lost when met by the 
spirits after escaping from the prison? Is 
there any way to keep from being caught 
by the boots? Is there a token that you can 
use to play the video game? 

In The Wild West, how do you get into 
the hotel room where Black Bart's girl- 
friend is? 

In The Interbank Incident, has anyone 
found where the thieves' hideout is? I have 
found the codcbook. but no crooks. 

Chad Johnson 
Benton. AR 

Some Key Points 

Scoreboard: 

A few hints for The Interbank Incident: 
The key will open the door on the train to 
Germany, and the door in the Louvre 
Museum. If you examine the mail bag on 
the train, you will find an invitation to a 
video game tournament in the guard room 
of the Louvre museum. 

One question — How do you get both 
keys for the door of the apartment with the 
Rio poster on it? 

Bill Marks 
Brockport. NY 

Hat Hint 

Scoreboard: 

In The Interbank Incident: To get into 
the military base in Seattle, either be "Mick 
Tannin" or buy a military hat in Paris. The 



Golem Woes 

Scoreboard: 

In Hall of the King 2, after I reach the 
room with the golem in it, I can't figure out 
how to kill him. I got the sphere, pushed 
the button and dropped it. only to have it 
kill me. Can it be done or do you have to 
go through the mine entrance? 

Jason Harder 
E. Hartland. CT 



Not Fond of Anaconda 

Scoreboard: 

I'm having trouble with Dallas Quest. 
When I meet up with the Anaconda, I can't 
do much or go anywhere with him in my 
way. 

Noel Nelson 
Aurora, CO 



Wheat Defeat 

Scoreboard: 

I am having trouble getting through the 
wheat field in Dallas Quest. 

Matthew Lohse 
Camarilio, CA 

CSAVE Survival 

Scoreboard: 

Last year I solved Dungeons of Daggo- 
rath, and let me tell you, it is practically 



Get by the Creepy-Crawlies 

Scoreboard: 

Here's help for Pitfall II: When you get 
the ring, fall down one ledge. Make it by 
the condors, bats, scorpions, and the one 
frog. Then go up and you shall find Quick- 
claw. 

Stephen Erickson 
E. Longmeadow, MA 



Slammin' Jammin' 

Scoreboard: 

In One-on-One does anyone know how 
to slam the ball backwards? 

Steve Heck 
Ft. Jackson, SC 



To respond to other readers' inquiries 
and requests for assistance, reply to 
"Scoreboard Pointers," c/o THE RAIN- 
BOW, P.O. Box 385, Prospect. KV 40059. 
We will immediately forward your letter to 
the original respondent and, just as impor- 
tantly, we'll share your reply with all 
"Scoreboard" readers in an upcoming 
issue. 

For greater convenience, "Scoreboard 
Pointers" and requests for assistance may 
also be sent to us through the MAIL, 
section of our Delphi CoCo SIG. From the 
CoCo SIG> prompt, pick MAIL, then 
type SEND and address to: EDITORS. Be 
sure to include your complete name and 
address. 

— Jody Doyle 
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NEW 

DISK 
DRIVES 



Starting at 




New Low Price! 




89 



95 



with case & 

Power Supply 

129.95 



TANDON MPI TEAC 

Speed 6ms tk to Ik and up 
Capacity 250k unformatted 
Tracks 40 
Warranty now 1 Year 

SATISFACTION GUARANTEED!! 

ALL DRIVES FULLY TESTED AND WARRANTEED 

We carry only the finest quality disk drives 
no seconds • no surplus 



40 Tks 6Ms 
Double Sided 
Double Density 

40 or 80 Tracks 
Vz Hght. Teac/Panasonic 




Free Software for Drive Systems 



CoCo Checker... lest roms, rams, disk drives and & controller printer, keyboard cassette & more. 
Tape/Disk Utility... Transfers disk to tape and tape to disk. 



169 



95 



Drive 



189 



95 



Drive 



289 



95 



Drive S 1 



• Full Ht Drive 

• Single Case 

• Heavy Duty Power Supply 

• 2 Drive Cable 

• Gold plated contacts 

• Controller & manuals 



• Double Sided Slim Line Drive 

• Case holds 2 slim line drives 

• Heavy Duly Power Supply 

• 2 Drive Cable 

• Gold plated contacts 

• Conlroller & Manuals 



• 2 Double Sided Slim Line Drive 

• Case holds 2 slim line drives 

• Heavy Duly Power Supply 

• 2 Drive Cable 

• Gold plated contacts 

• Controller & Manuals 



Other Drive Specials 
119 95 



Drives cleaned, aligned & tested, 29 



95 



2nd Drive 

for new Radio Shack 

includes: 

• Slim Line DS/DD Drive 

• Cabling & Instructions 

• Mounting Hardware 



Full Ht Drive 89 95 

Full Ht Drive Ps/Case 129 95 

Slim Line Drive 99 

Slim Line Drive Ps/Case... 139 

2 Slim Drives Ps/Case 239 

Disk Controller 59 



Single Ps & Case 

Dual V6W Ps & Case 

Dual Full Ht. Ps&Case. 
Disk Controller 



10 Diskettes 

with free library case 



44 95 

54 95 
79 95 
59 95 

9 95 



Dealer Inquiries Invited 
617-278-6555 



c 


1 




B | 


1 1 



TRUE DATA PRODUCTS 



We welcome 

• Visa/Mastercard 

• Checks (allow 2 weeks for clearing) 

• C.O.D. Add $2. 



9 South Main Street 
Uxbndge. MA 01569 
617-278-6555 

Hours: Mon.-Sat., 9-6 (EST) 



Call us today! 617-278-6555 
Order Toll Free 1-800-635-0300 



Software Included 

• Pc-Write word processor 

• Pc-Calc Spreadsheet 

• Pc-File Database 

• Print Spooler 

• Ram Disk 

• Runs all popular software 




IBM XT 
COMPATIBLE 



Complete 
system 



only 



699 



95 



Hardware Included 

• 4.77 mhz and 8mhz Turbo 

• 360k Floppy Disk Drive 

• Monochrome or Color Card 

• At style Case w/pwr light & key 

• Game, Printer and Serial Port 

• Real Time Clock 

• 150 watt power supply 
•640k memory 

•At keyboard optional expanded 

• Monochrome Monitor 

• Optional Hard Disk Drive 




PRINTER CABLES AND 
INTERFACES AVAILABLE 
Call lor current pricing 



PRINTERS 
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NP10 (New 100 CPS NLQ 80 col.) 
NX10 (New 120CPS NLQ 80 col.) 
NX15 (New 120CPS NLQ 132 col.) 
Power Type (18CPS Daisy Wheel) 



189 95 
21 9 95 
379 95 
249 95 



Complete Packages 

279 



npio 249 

includes: 

• Star NP10 Printer 

• Interface 



^95 

NX10 

includes: 

• Star NX10 Printer 

• Interface 



Screen Dump Program • Screen Dump Program 



TRUE DATA PRODUCTS 

9 South Main Street 
Uxbridge, MA 01569 
617-278-6555 




Serial to Parallel Interface 
for Color Computer I, II, III 



1 300-19,200 BAUD rates only 

' Exlernal lo printer — No AC plugs 
1 Built in modem/printer switch — 

No need tor Y-cables or plugging/ 

unplugging cables Power su PP'y + 50 ° 



54 



95 



64K Upgrades 
Video Driver 

Enables your CoCo to operate with a video monitor 
instead of a television! 



19*5 
2995 
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Screen Dump Program 19 95 

The best screen dump program for the Epson & 
Star printers ever!! Have the option of standard 
images reverse w/regular or double sized pictures. 



Dealer Inquiries invited 
617-278-6555 

Call us today! 617-278-6555 

Order Toll Free 1-800-635-0300 



COCO CONSULTATI 




Noisy Fan in 
Two-Drive System 



By Marty Goodman 
Rainbow Contributing Editor 



The Radio Shack service center in- 
stalled a fan in my Catalog No. 26-3129 
disk drive when they added a drive no. 
1 (Catalog No. 26-3130). I find now that 
it makes excessive noise. What do you 
recommend? 

Fred J. Fratto 
Downers Grove. 1L 

I'm rather suprised to hear that Radio 
Shack is using fans in their floppy disk 
drive systems. A well-designed linear 
power supply for dual (loppy drives — 
one that has properly beefy voltage 
regulators mounted on properly beefy 
heat sinks that are positioned to allow 
convective cooling — should never need 
a cooling fan. 

If you know a local hardware hacker, 
consider arranging to have the power 
supply for the drives rebuilt with an 
externally mounted massive heat sink 
and TO-3-style case voltage regulators, 
or at least a TO-3-style regulator on the 
1 2-volt supply line (or two TO-220-style 
case 12-vo\t regulators — one for each 

Martin H. Goodman, M.D., a physi- 
cian trained in anesthesiology, is a 
longtime electronics tinkerer and out- 
spoken commentator — sort of the 
Howard Cose 1 1 of the Co Co world. 
Marly is the database manager of RAIN- 
BOW'S CoCo and OS-9 Online SIGs on 
Delphi. His non-computer passions 
include running, mountaineering and 
outdoor photography. Marty lives in 
San Pablo, California. 



drive). I've both built and seen dozens 
of floppy disk power supplies, and only 
the most badly designed ones over- 
heated or required a fan. 



Proper Fix for CoCo Controllers 

I'm having trouble with my J&M 
brand controller when using it with my 
CoCo 3. Can you help? 

Matt Hazard 
Columbia, OH 

In a previous "CoCo Consultations," 
I advised folks (based on word from 
J&M systems) that old JFD CoCo 
controllers could be fixed to work with 
the CoCo 3 by replacing a 74LS04 chip 
with a 7404 chip. But more recently, 
J&M told me that this fix is not proper 
and will not always work. The last time 
I spoke to them, they were fixing JFD 
CoCo controllers that had problems 
working with the CoCo 3 by substitut- 
ing the Q clock signal for the E clock 
signal from the CoCo system bus. 

J&M provides a detailed description 
of exactly how to make the needed 
modifications in a technical bulletin 
dated January 5, 1987. Their bulletin 
lakes you step by step through this 
modification (soldering skill and a 
solder sucker are required). The bulletin 
is marred by one mildly confusing 



typographical error: They use the 
phrase "Pin 6" to describe both the E 
and the Q clock lands, when in fact the 
E clock is on Land number 6 and the 
Q clock is to be found on Land number 
7. But this is made clear in the diagrams 
that accompany the bulletin. If you are 
not comfortable with such hardware 
hacking, I urge you to return your 
controller to J&M for repair. 

Do make sure the problems are with 
the hardware of the controller, and not 
with the Disk ROM in it. For example, 
J DOS will not work properly with the 
CoCo 3. You need to have either un- 
modified Radio Shack Disk BASIC, or 
use ADOS 3, a set of patches for Disk 
BASIC specifically made by Spectrosys- 
tems to work with the CoCo 3. 



GIME Advice on the Horizontal Scroll 

I've been having problems designing 
programs that use the horizontal scroll 
register (SFF9F) of the GIME chip in 
the CoCo 3. Often they crash without 
apparent reason. Do you know of 
others who have this problem, and what 
its cause is? 

Bob Lentz 
La Jolla, CA 

Thanks very much for alerting me to 
this matter. I asked around and found 
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CALLIGRAPHER 



FOR 



CoC'o Cnlligrnplicr (Hybrid 

BASIC/ML) Turn your CoCo and dot- 
matrix printer into a calligrapher's quill. 
Make beautiful invitations, dyers, 
certificates, greeting cards, labels and 
more. Includes 3 fonts: Gay Nineties, Old 
English and Cartoon. The letters are V4 
inch high and variably spaced. Works with 
many printers including Epson, Gemini, 
Radio Shack, Okidata 92A, Banana and 
Prowritcr. Additional fonts are available 
(see below). Tape/Disk; $24.05. 

OS!) Calligrapher - (C) Although a 
different program from the CoCo Calligra- 
pher, the OS9 Calligrapher prints all the 
same fonts. It readb a standard text file 
which contains text and formatting direc- 
tives. You may specify the font to use, 
change fonts at any time, centering left, 
right or full justification, line fill, margin, 
line width, page size, page break and in- 
dentation. Similar to Iroff on UNIX (tin) 
systems. Includes Gay Nineties, Old En- 
glish and Cartoon fonts. Additional fonts 
are available (see below). Disk only; OS9; 
$24.05. 

Calligrapher Fonts - Requires Calligra- 
pher above. Each set on tape or disk; 
specify RSDOS or OS9 version; $1-1.05 
each. Set #1 - (9 fonts) Reduced, re- 
versed and reduced-reversed versions of 
Gay Nineties, Old English and Cartoon; 
Set #2 - (8 fonts) Old Style and Broad- 
way; Set #3 - (8 fonts) Antique and Busi- 
ness; Set #1 - (8 fonts) Wild West and 
Checkers; Set #5 - (10 fonts) Stars. He- 
brew and Victorian; Set #0 - (8 fonts) 
Block and Computer; 

Economy Font Packages on disk; speci- 
fy RSDOS or OS9; 20.05: Font Pack- 
age #1 - Above font sets I, 2 and 3 (25 
fonts) on one disk. Font Package #2 - 
Above font sets 4, 5 and fi (2G fonts) on 
one disk. 

UTILITIES 

Auto Run 01 - (Hybrid BASIC/ML) Util- 
ity to allow your own lapr-bascd BASIC or 
ML programs to display a graphics title 
screen and then self-start after loading. In- 
cludes a graphics editor to create profes- 
sional looking title screens. Tape onlv; ISK 
ECB; $10.05. 

Piratcctor - (100% ML) Utility to allow 
your own disk-based BASIC or ML pro- 
grams to display a graphics title screen 
and then self-start after loading. Adds 
copy protection to your programs but still 
allows users to create non-eieeulable. back- 
ups! Includes Semigraf. Disk only; CoCo I, 
II. Ill (except Semigraf); $30.05. 



A complete catalog ol" other sweet 
Sugar Software products Is available. 



Semigraf Graphics Editor - (100% ML) 
Use 8 colors and standard text characters 
to draw graphics pictures and screens in 
high resolution sctnigraphics mode. In- 
cludes sample pictures. Tape/Disk; lfiK 
CB; $10.05. 

Super Screen Machine - (100% ML) Put 
your CoC'o into high resolution mode for 
your own BASIC or ML programs. Smooth 
scroll, key click, lower case with colored 
characters, many other features. 
Tape/Disk; 32K CB; CoCo I, II, III (except 
6-1K mode); $10.05. 

Color Disk Manager - (100% ML) Disk 
utility with these features: Disk repair, 
selective track initialization, verify sectors, 
backups, tape to disk transfer, ROM Pak 
execution from disk, much more! 
Tape/Disk; CoCo I, II, III (except for 6-IK 
mode); $21.05. 

Color Tape Manager - (100% ML) Tape 
utility with these features: display start, 
end and exec address of ML programs, 
convert ML programs into BASIC DATA 
statements, append ML to BASIC, load, 
display/modify and save tape file, handles 
missing EOF and filename blocks, much 
more! Tape/Disk; 16K ECB; CoCo 1, II, 
III (except for OIK mode); $10.05. 

INFORMATION MGT. 

TIMS (The Information Management 
System) - (Hybrid BASIC/MLJ Tape or 
disk, fast and simple general data, base 
program. Create file? of records that can 
be quickly sorted, searched, deleted and 
updated. Powerful printer formatting. Up 
to 8 user fields, sort on up to 3 fields. 
Tape/Disk; $10.05 (see combo pkg below). 

TIMS Mail - (Hybrid BASIC/ML) Tape 
or Disk based mailing list management 
program. Files are compatible with TIMS. 
Fast and simple to use. Supports labels 1, 
2 or 3 across, 214 to I inches wide. 
Tape/Disk: $10.05 (sec combo pkg below). 

TIMS Utility - (Hybrid BASIC/ML) Util- 
ity companion for TIMS and TlMS Mail 
to allow multi-term search (AND and OR 
logic), global change and delete, split large 
files and more! Tape/Disk; $11.05 (see 
combo pkg below). 

TIMS Combo Package - All three of the 
above programs: TIMS, TIMS Mail and 
TIMS Utility on one disk - $3-1.05. 



SPORTS STATISTICS 

Statistics programs for the coach, team 
manager or avid fan who wants to keep 
accurate team and opponent records. 
Printer output supported. The following 
are available: Baseball, Basketball. Foot- 
ball and Soccer. Disk only; $10.05 each. 
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EDUCATIONAL 

Silly Syntax - (Hybrid BASIC/ML) Ages 
5 and up. Story creation game; output to 
screen or printer; includes 2 stories or 
create your own. Tape/Disk; $10.05 or 
disk with 02 stories for $20.05. Sets of 10 
stories on tape/disk for $-(.05: Fairy 
Tales, Current Events, X-Rated, Sing- 
Along. Adventure. Potpourri. 

Bible Stories Adventure - (Hybrid 
BASIC/ML) Ages -1 and up. A simple 
graphics adventure game for young chil- 
dren and their families. Old testament. 
Tape/Disk; $10.05. 

The Presidents of the USA - (100% 
ML) Ages 10 and up. Two trivia games, 
user modifiable, printer output supported, 
Tape/Disk; 10K ECB; $10.05. 

The Great. USA - Ages 9 and up. Shar- 
pen your knowledge of the 50 states. Cap- 
itals, nicknames, abbreviations. Rowers, 
trees, birds. Trivia! Tape/Disk: KiK ECB; 
$10.05. 

Galactic Hangman - Ages 7 and up. Ex- 
citing new twist to the popular word 
game. Outstanding graphics; 700 word vo- 
cabulary. Tape/Disk: 1GK ECB; $10.05 

PrcReader - (Hybrid BASIC/ML) Ages 
3-5 (level I); Ages 5-7 (level 2); Great 
graphics and music. Level 1: matching 
colors, shapes, letters and numbers; Level 
2: association of letters and consonant 
blends with their sounds. Tape/Disk; .Joys- 
tick; $10.05. 

Statgraf - High school and college level; 
Linear regression analysis program com- 
bined with a plotting and line graphing 
system. Enter up to 250 x/y pairs; data 
transformation; residuals: regression line; 
tint graph with screen print program 
not supplied); much more! Tape/Disk; 
$10.05. 

SPECIAL INTEREST 
Rental Property Income and Expense 
Management. Package - Maintain your 
rental properly income and expense 
records. Print output supported. 28 ex- 
pense categories. This program may In: tax 
deductible. Disk only: $20.05. 

Radio Systems Design Calculations - 
Performs 1-1 different calculations common- 
ly used in design or evaluation of land 
mobile radio systems, satellite TV, etc. 
Tape/Disk; $10.05. 

CoCo Knitter - Easy to use program to 
display or print instructions to knit a 
sweater: Cardigan or Pullover; Round or 
V-neck; Raglan or Set-in Sleeve; 3 weights 
or yarn; 8 sizes from baby to man. 
Tape/Disk; $10.05. 

Flying Tigers - (100% ML) Fast De- 
fenders style arcade game. 5 levels of 
difficulty; Great graphics and sound 
effects. Tape/Disk; Joystick; $10.05. 
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"TRS-80 is a trademark of Tandy Corp. 



SUGAR SOFTWARE 

P.O. Box 7446 

Hollywood, Florida 33081 

(305) 981-1241 



Ail program* run on the CoCo I, II and III. 3SK 
Extended Haeic, unkfn otherwise noted. Add 
$1.50 per tape or disk for postage and handling. 
Florida residents add >j% sales lax. COD orders 
add $-1. Dealer inquiries invited. 



that in most CoCo 3s owned by my 
friends, the horizontal scroll appears to 
have a serious problem. I have reason 
to believe that an inexpensive fix will 
eventually be available from Tandy. For 
now 1 recommend to software develop- 
ers that they not use the horizontal 
scroll features of the G1ME. At least, 
not until the required fix is announced 
officially by Tandy, which should be 
within a couple of months. Look for 
further word on this in RAINBOW. 



Monitor Adapter for CoCo 3 

/ have an RGB-capable monitor 
(JVC TM 90PSN), but its inputs are of 
the RGB TTL (digital) variety only. No 
provisions for analog RGB input are 
present. Can I use this with mv CoCo 
3? 

Alexandre Maggiain 
Lausanne, Switzerland 

If you want to get all 64 of the CoCo 
3's colors visible on your TTL RGB 
(sometimes called RGB I in IBM cir- 
cles) capable monitor, the answer to 



''The CoCo is a remarkably rugged 
and reliable computer, and it should 
be able to withstand being on 
continuously, for a very long time/' 



Color Computer Burn Out? 

/ want to leave my CoCo 2 on for 24 
hours a day running Desk Male. Will 
this burn it out? 

James Mc Dowell 
Wilmington, DE 

The CoCo is a remarkably rugged 
and reliable computer, and it should be 
able to withstand being on continu- 
ously, for a very long time. I have 
friends who use their systems this way, 
both to run bulletin board systems and 
to keep the power on in their 512K 
RAM disk cards. In general, their 
systems have survived quite well. Do 
note, however, that if your computer 
has any slight flaws in its power supply 
(particularly any tendency to overheat, 
which sometimes docs plague CoCos) 
running it 24 hours a day will accentuate 
such flaws and possibly cause the ma- 
chine to fail. Also, in theory, such use 
of the machine might somewhat de- 
crease its overall life. 



Slot Select Switch 



Why can't I switch my Multi-Pak 
from Slot 4 (disk drive) to Slot 3 
(R/S Speech/ Sound Pak) under pro- 
gram control? 

Johnathon S. Beat 
Addison, ME 



The Sound/ Speech Program Pak 
from Radio Shack has its addresses 
fully decoded via the address bus. 
Access to its ports is unaffected by the 
slot select switch (either the hardware or 
the software select switch). Because the 
interrupt handling routine of CoCo 
BASIC uses the Disk ROM (which is 
selected via the Multi-Pak selector 
switch), changing the slot selection 
(using either the slot selector switch or 
the software switch at SFF7F) while in 
Disk BASIC will usually cause the system 
to crash, though occasionally it will 
recover and reboot in Extended BASIC. 

To use the Sound/ Speech cartridge 
from Disk BASIC, just keep the slot 
selector pointing at the disk controller 
cartridge. You need to carefully study 
the documentation that comes with the 
Sound /Speech Pak and learn about its 
ports and how they function. 



your question is that it is impossible to 
use the monitor you describe with the 
CoCo 3 without some delicate custom 
modifications to its circuit. There is a 
commercial device just introduced by 
J&M systems that may be of some help 
to you. This device plugs in to the CoCo 
3's RGB connector and conditions the 
signal so that it can drive IBM-type 
RGB TTL monitors. The catch is that 
this system will only let you get six 
colors and black and white on such a 
monitor. Thus, this commercial adapter 
is of little use to those who want to use 
the many-colored graphics capabilities 
of the CoCo 3. However, the adapters 
are of considerable value to those who 
have an IBM-type RGB TTL monitor 
and want to use it for display of 80- 
column color text using their CoCo 3. 
I have viewed this adapter hooked to 
a TTL RGB monitor and a CoCo 3, and 
can report it worked very nicely. This 
adapter also has a jumper that is sup- 
posed to allow it to drive an IBM TTL 
type monochrome monitor. I personally 
did not get a chance to evaluate this 
option; however, the folks at J&M told 
me that, in such a mode, the image on 
the TTL IBM monochrome monitor 
does not quite fill the screen, but is 
readable. The adapter sells for S35 from 
J&M systems (see their ad in this issue 
of RAINBOW for their address). 



Four-Drive Systems 

/ have four TEC half-height drives, 
but can 't seem to get Drive 3 (the fourth 
drive in the system) to operate. Can vou 
help? 

John Kenziora 

(WIRES) 

Whitehouse. OH 

I once built several four-drive systems 
using TEC 501 half-height, single-sided 
drives, for use by a couple of major 
CoCo software publishers as mass disk 
production systems. The problem you 
face is common to all four-drive CoCo 
systems not made by Tandy. Tandy uses 
Pin 32 as the select line for Drive 3 on 
its disk controller. But most drives use 
Trace Number 6 as the Drive 3 select 
line. 

On the drive you are using as Drive 
3, you must cut Land 32 where it be- 
comes a PC board trace and jumper the 
incoming signal that goes to that land 
over to Land 6 on the drive. Finally, you 
must also jumper a source of +5 volts 
to the trace that used to be fed by Land 
32. You see. Land 32 is the side select 
line on most drives. And even on single- 
sided drives, circuitry is present for side 
selection. So if the trace that was fed by 
Land 32 is not pulled high, your drive 
may occasionally "float" between access 
of its (existing) Side and of its (non- 
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existent) Side 1. This would be disas- 
trous! Note also that 1 am assuming you 
have single-sided drives, because the 
CoCo's disk controller is not equipped 
to access more than three physical 
double-sided drives. 



allow you to blast data into the buffer 
at 9600 baud and serve it up to the 
DMP-200 via its parallel port, allowing 
it to print as fast as it is capable of doing. 



Speeding Up the DMP-200 

lam using a DMP-200 printer at 1200 
baud via the bit-banger port and find it 
hideously slow. How can I speed mat- 
ters up? Will a parallel interface help? 
Paul J. Burke 
(PJB) 
Palm dale, CA 

The DMP-200 printer is slow due to 
an unfortunate design: It first fills its 
line buffer, then prints the line in 
question. While it is printing, it is busy 
and cannot accept further data. When 
it finishes printing the line, it opens its 
buffer and waits until the whole next 
line has been received. This, of course, 
takes significant time when the data is 
being sent at 1200 baud. The result is 
what you observe — the printer twid- 
dling its thumbs after printing each line. 

If you fed it via a parallel port (such 
as the one provided on a J&M Disk 
Controller) it would fill its line buffer a 
great deal faster than it does with 1200 
baud serial data transfer, and thus the 
waits between lines would be mini- 
mized. But unless you are using OS-9, 
you may find that many applications 
programs cannot access the printer via 
an add-on parallel port. 

An alternative solution is to get a 
serial-to-parallel buffer/ converter. 1 
have seen old Microfazer units of this 
sort, wilh a 64K buffer, selling at swap 
meets here for as little as $50. This 
approach would preserve use of the 
standard bit-banger port, but would 



Bit-Banger Cables 

When hooking a primer to the CoCo 
bit-banger port, can you remind me 
what line is used for handshaking, and 
why? 

Rick Adams 

(RICKADAMS) 

Rohnert Park. CA 

Though some find it surprising, the 
CoCo (under BASIC and under most 
application programs I have seen) uses 
the Data In Line (Pin 2 of the DIN 
connector) as the printer busy detect 
line. You might have expected them to 
use the Carrier Detect (Pin 1) Line for 
this. But the Carrier Detect Line on the 
CoCo's bit-banger port is hooked inter- 
nally to that weird CA 1 pin on the PI A. 
Because of this, the Carrier Detect Line 
can only be used to detect a change in 
the status of the signal it sees. As you 
know, the CAI line is totally unable to 
detect the actual state of its input (high 
versus low). This makes it a lot less 
convenient to use. 

Now, in sending data to the printer, 
you never need to use the Data In Line 
to receive RS-232 serial data from the 
printer, so that Data In Line is free for 
use as a handshake signal detect line. It 
seems Tandy or Motorola ran out of 
available "normal"data port pins on the 
PIA when it came to finding a line for 
the carrier detect and so was forced to 
use the CAI line of the PIA. The end 
result of all this is that CoCo bit-banger 
printer cables are fundamentally differ- 
ent in the way they are wired from CoCo 
bit-banger modem cables. 



Normally, on the printer side, the 
CoCo Pin 2 is connected to the printer's 
Pin 20 of its DB 25 connector. Typically, 
Pin 20 (DTR) is used by most printers 
or parallel-to-serial converters as the 
handshake line. Do note that on some 
printers you must select Pin 20 as the 
handshake line via DIP switches, and 
on some you must even tell the printer 
(using other DIP switches) whether to 
use a high or low signal to tell the 
computer that the printer is busy. (The 
CoCo under BASIC wants you to use a 
low signal to tell it that the printer is 
busy.) 

Finally, note that the CoCo 3 has a 
curious addition to its circuit for the 
Data In Line. That line is pulled high 
internally by an R66, a 7.5K-ohm re- 
sistor. The effect is, if nothing is hooked 
to that line, it will see a "high," and data 
will be sent out (into the air, if nothing 
is hooked up). Recall how this is differ- 
ent from the behavior of the CoCo I and 
2, which lack this pull-up resistor. On 
those machines, if nothing was hooked 
to the port, the computer would hang 
if you tried to print anything via BASIC, 
waiting for the Data In Line to register 
a high (printer not busy) signal. 



Your technical questions are welcomed. 
Please address them to CoCo Consultations, 
THE RAINBOW, P.O. Box 385, Prospect, KY 
40059. 

We reserve the right to publish only 
questions of general interest and to edit for 
brevity and clarity. Due to the large volume 
of mail we receive, we are unable to answer 
letters individually. 

Questions can also be sent to Marty 
through the Delphi CoCo SIC. From the 
CoCo SIG> prompt, pick Rainbow Maga- 
zine Services, then, at the RAINBOW> 
prompt, type ASK (for Ask the Experts) to 
arrive at the EXPERTS> prompt, where 
you can select the "CoCo Consultations" 
online form which has complete instruc- 
tions. 







CSG-IMS/CoCo IOS9- LI) $150 
CSG IMS'CoCo3 OS9 Lll (single user) 5200 
CSG-IMS/0S9 Lll (mulliusen $495 
CSG-IMS/OS9 6BK $495 
CSG-IMS Demo wilh manual $30 

Shipping: N America • $5. Overseas $10 

Clearbrook Software Group 
P.O. Box 8000-499 
Sumas. Wa 98295 
Phone: (604) 853-9118 
BBS: (604) 859-1266 

Available in Canada Irom: 

Kelly Software Distributors Ltd. 

Phone: (403) 236-2161 

OS9 is a trademark & Microware and Motorola Inc 




W 


— f\ 4 ^ * J m y» 


Information Management System 
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eatured relational database manager for the Color Computer and OS9. The com- 
i application language makes CSG-IMS the ideal development tool for file-intensive 
licated applications can be developed in a small fraction of the time required for 

s. 

s to databases — Record, index and file size almost 
• queries. unlimited. 

s a recursive compiled — Text, BCD floating point (14 digit), short 
ing program modules and long integer and date types. 
er passing. — Run-time interpreter available, 
aen and report formats. — Comprehensive 320 page manual/tutorial. 
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PRINTER UTILITY 



Pretty Little Listings , 
All in a Row 



By George Quellhorst 



The idea for Two Column Lister 
originated with an article in the 
May 1985 issue by Mr. Stehan Lai 
called 2-COLUMN. All that remains of 
the original program are lines 49 to 52. 

Although this program was specifi- 
cally written to be used with a DMP- 
130 printer, changing it for use with 
other printers is simple. All the printer 
codes are contained in a "printer-code 
select" GOSUB that lets you select from 
eight different character styles for 
printing your newly generated printout 
(lines 94-101). By changing the printer 
codes in these lines, printer compatibil- 
ity does not present any particular 
problems. 

Two Column Lister generates both 
32- and 40-wide two-column listings, 
and some of its other features make this 
a very user-friendly utility. The capabil- 
ity to save a newly generated listing to 
disk comes in very handy, especially 
when more than one listing is needed. 
Also included is an automatic page- 
numbering system that lets you set the 
value of the first page number of the 
listing. A rather annoying bug, that 
printed a line filled with spaces when- 
ever the line preceeding it was exactly 
32 characters long, has been extermi- 
nated. 

You may need to make one or two 
changes in Line I. If you do not have 
a CM-8 or some other RGB monitor, 
change the command PRLETTERGB to 
PflLETTECPIP. The POKE150,18 sets the 

George Quellhorst lives in Painesville, 
Ohio, and has had a CoCo since the 4K 
days. He enjoys writing programs on his 
two Co Co 2 s and a Co Co 3 with RGB 
monitor. 



baud rate of the Color Computer to 
2400. The baud rate is the speed at 
which CoCo 3 sends its information to 
the printer. If your printer cannot 
handle this speed, change it to 
PDKE150,41 for 1200 or to 
POKE 150, 87 for a baud rate of 600. The 
baud rale does not affect the speed at 
which the printer does its printing. A 
higher or lower baud rate shortens or 
lenghtens the time your printer needs to 
fill its buffer. The only time you actually 
save is in the shorter intervals between 
the printing of each line. 

Because the designers of the Color 
Computer 3's ROM left the cursor on 
the Hi-Res screen while the computer's 
executing a program, I had two options 
while writing this program. I could 
either have cursors Hashing all over the 
screen while the listing was being loaded 
into memory, or I could put an flTTR 1 , 
and a LOCATE command after each 
PRINT statement, in order to make the 
cursor invisible. I chose the latter; 
although the big drawback is that 
whenever an error occurs while the 
computer is in the ATTRl, mode, 
you'll end up with an empty screen and 
absolutely no idea what sort of error 
occurred where. In the future, when 
writing a program for the CoCo 3, 1 am 
going to put the values in this ATTR 
command into variables, thereby elim- 
inating the blind search for an error and 
the need to change all the RTTR com- 
mands. What we need here is a new 
ROM, without fancy pictures em- 
bedded in it, and a cursor that knows 
how to behave itself. The syntax for a 
PRINT statement without a cursor 
printed behind it is LOCATE 8, 
4 :RTTR3, 2: PRINT "HELLO" ;: flTTRl, 



0:LOCATE1B,G. Please note the se- 
quence: 

1) LOCATE the cursor. 

2) The RTTR for your print statement. 

3) Make your PRINT statement. 

4) Set foreground and background to 
the same color (flTTRl, 0) 

5) LOCATE cursor at the next print 
location. 

Because of all this, 1 have designed a 
rather elaborate input section, making 
it almost impossible to get any kind of 
error that would halt the execution of 
the program. In the words of my son, 
"It is almost, but not quite, idiot-proof." 

The program is divided into three 
parts. First comes input section, fol- 
lowed by the actual listing generator 
(coupled with an output section that 
will write the generated listing either to 
your printer or disk). The last part 
retrieves a previously generated listing, 
writing it directly to the printer one page 
at a time. 

A word of caution before we take a 
look at the program. If you type in the 
listing, pay close attention to the 
number of spaces needed in lines 70 and 
71. Those spaces center the listings on 
your paper when they are printed and 
formats them before they are saved. 

Starting with the main menu, the first 
item we will look at is the creation of 
a two-column listing. The program you 
are going to LLIST has to be saved in 
ASCII code on your disk. Seven pieces 
of information are required before a 
new listing can be generated. First, of 
course, is the filename of the listing. The 
extention has to be ".BAS." The error- 
trapping routine will not allow you to 
enter a filename longer than eight 
characters. It also won't accept the 
name of a file that does not exist on your 
disk, or any file that does not have 
".BAS" as an extention. Neither will it 
accept a CHR$(13), ENTER. All this is 
accomplished in lines 16 to 18. Line 16 
is a LINEINPUT, which adds ".BAS" to 
your input. It then checks to see if 
DN$=".BA5". If it does, it means you 
pressed ENTER only, and the program 
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goes right back to 16. Line 17 checks the 
length of the filename including the 
extension. If it's greater than 12, it does 
a GQSUB 82, which erases the message 
on the bottom of your screen. After 
returning, it does a GDSUB 84, and the 
new message will let you know that a 
filename cannot exceed eight charac- 
ters. The LOCATE 21 , 3 : PR INT "" erases 
the filename you typed and returns to 
Line 16. The program to be listed is 
treated as a direct access file in which 
each entry is one character long. Line 
18 opens your file DNS and checks the 
length of the file. If the length of the file, 
LDF ( 1 ) , is zero, the file was not on your 
disk and was just now opened. The 
program kills the just opened file, tells 
you that the file does not exist and 
routes itself back to 16. If you enter a 
valid filename, the program opens the 
file and prints the message ".BAS 
OPEN" behind the filename you have 
just entered (Line 18). 

Each time an input is required, the 
program prints a message on the bot- 
tom of the screen to let you know the 
requirements and limitations of that 
particular entry. Since we went through 
the error-trapping routine for the first 
input statement, I won't go through the 
rest of them step by step; all are written 
in a similar fashion. 

Each time the computer prompts for 
an input, you will notice a flashing left 
arrow on a blue background. This is the 
limit cursor. You must press ENTER on 
or before this cursor. For example, a 
filename will be exactly eight characters 
long if you pressed ENTER on top of this 
cursor. 

The next input is the listing title. If 
no title is desired, press ENTER. The 
message "no header" will appear. The 
filename for your two-column listing is 
the next entry. Even if you are not 
planning to save the listing to disk, 
which you signify by pressing ENTER, 
Two-Column Lisler still opens a file for 
the listing. Line 27 takes care of it by 
naming the file N^DflT and printing the 
message "printer." As soon as the listing 
is printed, this file is killed. 

I have provided an input for first page 
number in case your listing follows 
documentation for a program, or to 
cover any situation where you might not 
want the first page number to be 
number one. To start with one, press 
ENTER. 

If you pressed enter at the Filename 
prompt, the program skips the Disk or 
Printer prompt and displays "printer." 
Otherwise, press D for disk or P for 
printer. 



The last two inputs are important. 
They determine how the listing is for- 
matted before it is generated. A listing 
formatted to be 40 columns wide, and 
then saved as such, has to be printed 
later on in exactly the same way. The 
same holds true for the character width 
of 10 or 12 cpi. Check out the lines 71 
to 72 where C0=(B*CPI) and W is the 
column width. The listing can be for- 
matted three ways. It is impossible to 
list a 40 character wide two-column 
listing at 10 cpi since that would print 
only a total of 80 characters per line. 
The error-trapping routines check for 
that mistake. 

If you are sending the listing directly 
to the printer, the next order of business 
is the selection of the character style you 
want. With a listing that is 32 columns 
wide, you may select one of the eight 
styles. In a 40-column listing, you are 
restricted to the last four (12 cpi). The 
program will not allow you to select a 
10 cpi width when you're formatting a 
40-column listing. It gives a warning 
and waits for another input. When 
selecting printer codes, the printer has 
to be on; printer codes are sent directly 



to the printer. If your printer is off, the 
program will hang up until you turn it 
on. 

Generating the Llisting 

This is accomplished in Line 44 and 
lines 49 through 58. Line 44 opens a 
second file to accept the new listing, 
which will be stored in memory until it 
is either dumped to the printer or saved 
on disk. File one, the original listing 
saved in ASCII code, was opened in 
Line 18. 

In order to count the number of 
characters for each line, we are going to 
treat the original listing as though it was 
saved to the disk as a direct access file, 
with each entry being one character 
long. The first thing we must do is make 
sure there is no previous information 
left in the computer's memory to inter- 
fere with our listing. Since we want to 
end up with 1 14 lines of text, we start 
a FOR-NEXT loop to contain the entire 
first page and make each line equal BLS, 
which was defined in Line 44 as W (our 
line width) number of spaces. 

Line 50 opens a second FOR-NEXT 
loop for each line. CN keeps a running 
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count of all characters, including 
spaces, taken from the disk. The vari- 
able LF equals L0F(1). Therefore, IF 
CN>LF, the end of our file has been 
reached. ST is a flag, which we will use 
later to let the computer know all the 
information has been retrieved from the 
disk. Line 51 gets the first character, 
RD$, from the disk and checks to see if 
it's a CHR$(13) which, since you press 
ENTER after typing in each program 
line, indicates that the end of a program 
line has been reached. Presuming our 
character is not a CHRS (13), Line 51 
takes the first empty space in PL$(F), 
our first line, and replaces it with RD$. 
The next Fl gets the second character 
and so on, until either a CHR$(13) is 
found or W is reached. Since we are 
replacing spaces in an existing line, it 
does not matter if the line is only nine 
characters long; the remaining spaces 
fill out the rest, and the length of the line 
will always equal Ul . 

Since a program line exactly 32 or 40 
characters long is really 33 or 41 char- 
acters long because of the CHRS ( 13 ) on 
the end, the program would put the 
CHRS (13) on the next line, leaving you 
with a line of unprinted material. There- 
fore, whenever we find a CHRS ( 13 ) , the 
program is routed to Line 53 which 
checks for such an occurrence and 
deletes the empty line. After we have 
reached N or a CHRS (13), the first line 
is completed and we go back to 50 to 
start on the second line of the listing. 
This continues until CN=L0F ( 1 ) or until 
1 14 lines have been generated. 

When the first page of material is in 
memory, we have to dump it either to 
the printer or the disk in order to make 
room for the next page. Take a look at 
Line 41; it reads C0=(B*X) and 
fl$ ( ) =STR$ ( X ) +WS+ "* "+NNS. X is the 
variable for the cpi you selected. We 



have multiplied X by 8 to give us the 
total characters for each line, took the 
name of our new listing (NMS), the width 
of our listing (W$), and we have placed 
the whole thing into a new variable 
called A$(0). The * is being used for 
later reconstitution of the original 
variables with the use of an IN5TR 
command. If you have decided to list 
directly to the printer, AS ( ) will not be 
used. However, when you are saving the 
listing to your disk, fl$(0) will be the 
first thing that is placed on your disk. 
It will be retrieved whenever you are 
printing a saved listing from the disk to 
inform you what kind of listing you are 
dealing with. 

We now have 1 14 lines of text in 
memory, each line either 32 or 40 
characters wide. In order to format this 
for printing or saving, we must first 
determine if we indeed have 1 14 lines. 
It may have been a very short listing, or 
it may be the last page of a longer listing. 
We do this in Line 65. First, we deter- 
mine if F, the number of program lines, 
is smaller than 1 14. If so, and if ST— 1, 
F is divided by two to set the value of 
Q. Line 69 opens a FDR-NEXT loop: 
F0RG=1T0Q. By looking at the next line, 
and presuming we have a listing that is 
40 characters wide, Line 70 creates 57 
lines of two-column text by combining 
the first and the 58th line into AS, 
adding margins and spaces in between 
columns as it does so. We print or save 
AS in Line 72. Then the NEXTG gets lines 
2 and 59, and so on, until the whole page 
is either printed or saved to disk. 

Line 75 prints the page number, and 
IFST=1 Line 77 either ends the program 
or returns to get page two from the disk. 
In case we have a partially filled page 
after the whole listing is printed or 
saved, lines 74, 78 and 80 compute the 
amount of line feeds to be printed, so 



that we are able to print the page 
number in the correct position. A line 
of 40 asterisks will be printed under- 
neath the listing by Line 79. 

Printing A Saved Llisting 

This is a straightforward program. 
After you press the number two on the 
main menu, a directory of your disk 
appears. After entering the filename, 
the computer gets the first page of the 
listing from the disk and prints the name 
of your program, the character width 
and the width, either 32 or 40, of your 
listing on the screen and prompts you 
to make a character style selection. 
Again, the error-trapping routines will 
not allow you to make an error when 
you're in the process of selecting the 
printer codes. 

The program will retrieve your listing 
from the disk one page at a time, print 
the page, erase memory and return to 
get the next page. You have the option 
to have the computer wait for your 
command before it prints the second 
page or to print the entire listing at once. 
There is really no reason to have the 
computer stop between sheets, because 
it will skip the perforations and produce 
a listing centered on your paper. How- 
ever, the option is there. 

Last, but not least, the computer 
keeps you informed as to what is going 
on, by printing little messages on the 
screen. For example, "now loading page 
one" or "now printing page one." As a 
result, you will find Two-Column Lister 
a very user-friendly piece of software 
that is simple to use. 

(Questions about this program may 
be directed to Mr. Quellhorst at 1572 
Mentor Ave., Painesville, OH 44077; 
216-352-2977. Please enclose an SASE 
for a reply when writing.) □ 
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The listing: LL I STER 

1 UNLOAD :POKE654 97, : CLEAR70J30 : P 
OKE15J3 , 18 : WIDTH4J3 : PALETTERGB: Q=5 



7 : DIMA$ ( 67 ) , PL$ ( 114 ) : ST$=STRING$ 
(35,32) 

2 CLS : LOCATE 7 , 2 : ATTR4 , 5 : PRINT" 3 2 
/ 40 TWO COLUMN LLISTER" ; : ATTR1 

, )2 : LOCATE8 , 4 : ATTR3 , 2 : PRINT"FOR T 
HE COLOR COMPUTER 3 " ; : ATTR1 ,0 : LO 
CATE lj3 , 6 : ATTR3 , 3 : PRINT " BY : GEORGE 
QUELLHORST" ; : ATTR1 , : LOCATE3 8 , 8 
: ATTR0 , j3 

3 F0RT=1T08:L0CATE2,T:ATTR3,3,B: 
PRINT" * " ; : ATTR1 , : NEXT : FORT=0TO8 
: LOCATE37 , T: ATTR3 , 3 , B: PRINT"*" ; : 
ATTR1 , jd : NEXT : ATTR1 , <jb : L$=STRING$ ( 
3 6,42): LOCATE2 , : ATTR3 , 3 , B : PRINT 
L$ ; : ATTR1 , fl : LOCATE2 , 8 : ATTR3 , 3 , B : 
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PRINTL$ ; : ATTR1 , : L0CATE2 , 9 

4 L$=STRING$(20,45) : ATTR^S , : LOCA 
TE1J8, 11: PRINT" YOU HAVE TWO OPTIO 
NS" : LOCATE10 , 12 : PRINTL$ : LOCATE7 , 
14: PRINT" 1. GENERATE A 3 2 OR 4j3" 
:LOCATE10,15:PRINT"TWO COLUMN LL 
ISTING" 

5 LOCATE7,18:PRINT"2. PRINT A PR 
EVIOUSLY" : LOCATE10 , 19 : PRINT"GENE 
RATED LLISTING":LOCATElp,2p:PRIN 
T"SAVED ON YOUR DISK" : LOCATE8 , 23 
:PRINT"PRESS EITHER <1> OR <2>"; 
: ATTR1 , j3 : LOCATE3 8 , 2 2 : POKE6549 6 , 

6 ATTRj3,p:IN$=INKEY$:IN=INSTR(l, 
" 12 " , IN$ ) : IFIN=0ORIN$=" "THEN6 

7 ON IN GOTO 8,102 

8 CLS : LOCATE 3,0: ATTR3 , 2 : PRINT " 3 2 
/40 COLUMN LLISTER FOR COCO III" 
; : ATTR1 , : LOCATE 3 8 , : ATTR0 , 

9 LOCATE 1,3: PRINT " PROGRAMS NAME . 



10 LOCATEl,5:PRINT"LLISTINGS HEA 
DER. . . :" 

11 LOCATEl,7:PRINT"LLISTINGS FIL 
E NAME:" 

12 LOCATE1, 9: PRINT" FIRST PAGE NU 
MBER. . :":LOCATEl,ll:PRINT"DISK 



R PRINTER :" 

13 L0CATE1,13:PRINT"32 OR 40 LLI 
STING. . :":LOCATE1,15:PRINT"10 OR 

12 CPI :" 

14 S$=STRING$(3 9,61) :LOCATE0,17: 
PRINTS$ ; : FORT=18T023 : LOCATE0 , T : P 
RINT"="; :NEXT:FORT=18T023: LOCATE 
3 8 , T : PRINT" = " ; : NEXT : LOCATE0 , 2 3 : P 
RINTS$; 

15 LOCATE2 , 19 : ATTR3 , 2 : PRINT"PROG 
RAM MUST BE SAVED IN ASCII CODE" 
; : ATTR1 , : LOCATE 7 ,21: ATTR3 , 2 : PRI 
NT"EXTENTION /BAS IS ASSUMED" ;:A 
TTR1 , 

16 ATTR0,0:LPOKE442 671,170:LPOKE 
442670 , 95 : LOCATE21 , 3 : LINEINPUT"> 

" ; DN$ : DN$=DN$+"/BAS" : IFDN$="/BA 
S"THEN16 

17 IFLEN(DN$)>12THENLOCATE21,3:P 
RINT" " : GOSUB8 1 : GOSUB83 : GOT016EL 
SE18 

18 OPEN"D",#1,DN$,1:IFLOF(1)=0TH 
ENGOSUB81 : GOSUB13 9 : LOCATE6 , 20 : AT 
TR0,0,B: PRINT "FILE DOES NOT EXIS 
T TRY AGAIN" ; : ATTR0 , : LOCATE2 1 , 3 
: PRINT" " : CLOSE#l : KILLDN$ : GOT016 
ELSELOCATE23 , 3 : PRINTDN$ : LOCATE3 6 
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Your copy of the rainbow is sent second class 
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EACH PROGRAM COMES WITH 
** 10 FREE DISKS ** 



CHECKBOOK III - S19.98 COCO 3 Only 

PUZZLE MATH - S19.98 Grades 2-5 

WORD MEANINGS - S24.98 Grades 2-Adult 

VCR DATABASE & MINI TITLE SCREEN MAKER - $20.98 

DIRECTORY VIEWER - S19.98 

S.T.A.G. - A GRADEB00K - S35.00 

COUPON FILER - $19.98 COCO 1 & 2 Only 

S.B. INVENTORY III - $24.98 COCO 3 Only 

Small business inventory control. Includes catalog & page no., item 

& packing descriptions, cost per pack, markup & retail cost, number 

in stock + reorder point. Holds over 500 records at one time. 

SUPERTHELLO - $21.98 
Like the great board game, but played like it's never been played 
before. Two versions provided. 2 joysticks required. 

FILE VIEWER - $19.98 
Single key program loading. View all disks files at one time. Move 
the file pointer to the file you wish to load, kill, rename, etc. and press 
1 key. Even copies itself to other disks with one key. 



PROGRAMS FOR 64K COCO 1 ,2,3, 1 DISK. ADD $3 S/H. C.O.D. $2 
EXTRA. MS RES 6% SALES TAX. CALL/WRITE FOR FREE CATALOG. 



EXCITING OPPORTUNITY FOR NEW PROGRAMMERS TO MARKET 
THEIR PROGRAMS. WRITE FOR DETAILS. DEALERS WELCOME. 



SECA - P.O. BOX 3134 

GULFP0RT, MS 39505 

(601) 832-8236 
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, 3 : ATTR3 , 3 , B: PRINT"OPEN" J : ATTR1 , 
0: LOCATE 3,1 

19 GOSUB81:LOCATE3,19:ATTR3,2:PR 
INT"TITLE FOR YOUR LISTING MAXIM 
UM 16";: ATTR1 , : LOCATE 4 ,21: ATTR3 
,2:PRINT"PRESS ENTER IF NO TITLE 

DESIRED"; :ATTR1, j3:LOCATE21, 5 

20 ATTR0,0:LPOKE442 847,170:LPOKE 
44284 6,95:LOCATE21,5:LINEINPUT"> 

";HE$:ATTR1,0 

21 ATTR0,0:IFLEN(HE$)>16THEN2 2EL 
SE23 

22 LOCATE21,5:PRINTSTRING$(17,32 
) ; : LOCATED , 6 : PRINTSTRING$ ( 10 , 3 2 ) 
; : GOSUB8 1 : GOSUB8 2 : ATTR1 , : GOTO20 

23 LE=LEN(HE$) : IFHE$=""THENOT=l: 
LOCATE23 , 5 : PRINT"NO HEADER" ; : ATT 
R1,0:LOCATE35,7 

24 GOSUB81:LOCATE6,18:ATTR3,2:PR 
INT'TILENAME FOR YOUR LLISTING" ; 
: ATTR1 , : LOCATE2 , 20 : ATTR3 , 3 , B : PR 
INT"WHEN LISTING TO PRINTER PRES 
S ENTER" ; : ATTRp , : LOCATE7 ,22: ATT 
R3,2:PRINT"EXTENTION /DAT IS ASS 
UMED"; :ATTRl,j3 

25 ATTR^,p:LPOKE442991,17^:LPOKE 
442990 , 95 : LOCATE21, 7 : LINEINPUT"> 

";NM$ 

26 IFLEN(NM$)>8THENLOCATE21,7:PR 
INT" " : GOSUB81 : GOSUB83 : GOT025ELS 
E27 

27 IFNM$=""THENNM$="N":LOCATE23, 
7: PRINT "PRINTER"; : L$="P" : ATTR1 ,0 
: LOCATE 3 8 , 7 : ELSENM$=NM$+"/DAT" 

28 GOSUB81:LOCATE4,18:ATTR3,2:PR 
INT "ENTER THE STARTING PAGE NUMB 
ER" ; : ATTR1 , : LOCATE3 , 20 : ATTR3 , 2 : 
PRINT"OF YOUR 32 OR 40 COLUMN LL 
ISTING" ; : ATTR1 , : L0CATE1 ,22: ATTR 
3,2:PRINT"2 DIGITS MAX. ENTER ST 
ARTS AT PAGE 1";:ATTR1,0 

29 LPOKE443139,170:LPOKE443138,9 
5 : L0CATE2 1,9: ATTRJ3 , : LINEINPUT"> 

" ; PG$ : IFPG$=" "THENPG$="1" : LOCAT 
E23,9:PRINT"1" 

30 IFLEN(PG$)>3THENLOCATE21,9:PR 
INT" " : G0SUB8 1 : G0SUB8 2 : G0T02 9ELS 
EPG=VAL(PG$) 

3 1 IFL$="P"THENU=-2 : L0CATE2 1,11: 
PRINT" > PRINTER" ; :GOT03 4ELSEGOSU 
B81:LOCATElj3,19:ATTR3,2:PRINT"EN 
TER <D> FOR DISK"; :ATTR1,0: LOCAT 
E9, 21 :ATTR3, 2: PRINT "ENTER <P> FO 
R PRINTER" ;:ATTR1,0 

32 LPOKE443297,17j3:LPOKE443296,9 
5 : L0CATE2 1,11: ATTR0 , : LINEINPUT" 
> ";L$:IFL$=""THEN32 

33 A1=INSTR(1,"PD",L$) :IFA1=1THE 



NU=-2ELSEIFA1=2THENU=2ELSEG0SUB1 
39 :L0CATE2 1,11: PRINT" ":GOT032 

34 GOSUB81:LOCATE13,20:ATTR3,2:P 
RINT"ENTER 32 OR 40";:ATTR1,0 

35 LPOKE443459,17^l:LPOKE443458,9 
5 : LOCATE 2 1,13: ATTR0 , : LINEINPUT" 

> ";W$ 

36 W=VAL(W$) :IFW=320RW=4^5THEN37E 
LSEGOSUB139:LOCATE21,13:ATTR0,j3: 
PRINT" ":GOT035 

37 G0SUB81:L0CATE14,18:ATTR3,2:P 
RINT" PLEASE NOTE"; :ATTR1, : LOCAT 
E5,2^:ATTR3,2:PRINT"4j3 COLUMNS C 
AN ONLY BE LISTED" ; :ATTR1,0 : LOCA 
TE9,22:ATTR3,2:PRINT"IN THE 12 C 
.P.I. MODE"; :ATTR1,J3 

38 LPOKE443 619 , 17j3 : LPOKE443618 , 9 
5 : L0CATE21 , 15 : ATTRJ3 , : LINEINPUT" 

> ";X$:X=VAL(X$) 

39 IFX=10ORX=12THEN40ELSEGOSUB13 
9 :L0CATE2 1,15: PRINT" ":GOT038 

40 IFW=40ANDX=10THENGOSUB139:LOC 
ATE21, 15: PRINT" ":GOT03 8 

41 AL= / 0:CN=1:CO=(8*X) :PN=INT( (CO 
-LE)/2) :A$(p)=STR$(X)+W$+"*"+NM$ 

42 CLS:IF L$="P"THEN GOSUB84 

4 3 CLS : LOCATE 10, 6: PRINT "INSERT P 
ROGRAM DISK":LOCATE12,8:PRINT"AN 
D PRESS ENTER" :L0CATE18, 10 : LINEI 
NPUT">";A$ 

44 BL$=STRING$(W,32) :OPEN "0" , #2 
,NM$ 

45 FIELD#1,1 AS RD$:LF=LOF (1) 

46 CLS:LOCATE9,l:ATTR3,2,B:PRINT 
"NOW LOADIN G";:ATTRp, 
0: LOCATE 8, 4: PRINT "LOADING WILL B 
E FINISHED" : L0CATE7 , 6 : PRINT" BEFO 
RE THIS NUMBER REACHES" : LOCATE 17 
,9:PRINT"< 114 >":ATTRl,p: LOCATE 
38,9 

47 PG$=STR$(PG) :IFVAL(PG$)<10THE 
NPG$="pp"+RIGHT$(PG$,l)ELSEPG$=" 
p"+RIGHT$(PG$,2) 

48 LOCATEip, 16 :ATTR0,p: PRINT "NOW 
LOADING PAGE NUMBER" : LOCATE 17 , 1 

9: PRINT" < ";PG$; : LOCATE2 3 , 19 : PRI 
NT">":ATTRl,j3:LOCATE38,9 

49 F0RF=1T0114:PL$(F)=BL$ 

50 F0RF1=1T0W:CN=CN+1:IFCN>=LF T 
HENST=l:GOT058 

51 GET#1,CN:IFRD$=CHR$(13)THEN53 

52 MID$(PL$(F) ,F1,1)=RD$:NEXTF1 

53 IF PL$(F)<>STRING$(W,32)ANDPL 
$ (F-l) =STRING$ (W, 32) THENPL$ (F-l) 
=PL$(F) :PL$ (F)=BL$:CN=CN-INSTR(1 
,PL$(F-1) ,CHR$(13) ) :GOTO50 

54 F$=STR$ ( F) : F$=RIGHT$ ( F$ , LEN ( F 
$) -1) : IFVAL(F$) <10THENF$="j3"+RIG 



182 



THE RAINBOW May 1987 



HT$(F$,1) 

55 IFVAL(F$) <100THENF$="0"+RIGHT 
$(F$ ; 2) 

56 ATTR0,0:A$=LEFT$(F$,1) : B$=MID 
$(F$,2,1) :C$=RIGHT$(F$,1) 

57 S=443362:LPOKES,60:LPOKE(S+4) 
,ASC(A$) :LP0KE(S+6) ,ASC(B$) : LPOK 
E(S+8) ,ASC(C$) :LPOKE(S+12) ,62:NE 
XTF 

58 CLS:GOSUB61 

59 IFST=1THEN101 

60 OT=l:GOTO 46 

61 CLS : IFU=-2THENLOCATE7 , 6 : ATTR0 
,0:PRINT"POSITION PAPER IN PRINT 
ER" :LOCATEll,8:PRINT"AND PRESS < 
ENTER>" : GOSUB13 9 : LOCATE18 , 10 : LIN 
EINPUT">" ;I$ 

62 IFAL=0 ANDU=2 THEN PRINT#2,A$ 
(0) ELSE IF U=2 THEN PRINT#2 

63 IF OT=l THENF0RT=1T05:PRINT#U 
:NEXT:GOT065 

64 F0RT=1T02:PRINT#U:NEXT:PRINT# 
U, STRING$ (PN, 32) +HE$ : PRINT#U, STR 
ING$ ( PN , 3 2 ) +STRING$ ( LE , 6 1 ) : PRINT 
#U 

65 IFF<114ANDST=1THENQ=INT( ( (F)/ 
2)+. 5) :Z=1 

66 IFL$="D" OR U=2 THEN 68 

67 CLS:LOCATE14,10:ATTR3,2,B:PRI 
NT"NOW PRINTING" ; : ATTR1 , : LOCATE 
3 5 , 10 : ATTR0 , : GOT06 9 

68 CLS:LOCATE11,10:ATTR3,2,B:PRI 
NT"NOW SAVING TO DISK" ; : ATTR1 , : 
LOCATE 3 5 , 10 : ATTR0 , 

69 FORG=lTOQ 

70 IFW=40THENA$=" "+PL$(G)+" 

"+PL$(G+Q) :GOT072 

71 IF CO=96 THEN A$=" " 
+PL$(G)+" "+PL$(G+Q) E 
LSE IF CO=80 THEN A$=" "+PL$ ( 
G)+" "+PL$(G+Q) 

72 PRINT#U,A$:NEXTG 

73 PRINTfU 

74 IF Z=l THEN 78 

75 IF CO=80 THEN PRINT#U, STRING$ 
(70,32) ;:PRINT#U,"Page";PG ELSE 
IF CO=96 THEN PRINT#U, STRING$ (86 
,32) ;: PRINT #U," Page" ;PG 

7 6 PRINT#U:PRINT#U 

77 IFST=1THEN101ELSEPG=PG+1:AL=1 
: RETURN 

78 W=(63-(Q+6) ) :IF W=0 THEN75 

79 RN=INT( (CO-40)/2) : PRINT #U, STR 
ING$(RN,32) ;STRING$(40,42) 

80 W=(W-2) :IFW=<0THEN75ELSEPRINT 
#U,STRING$(W,13) :GOT075 

81 ATTR1,0:FORT=18TO22:LOCATE1,T 
: PRINTST$ ; : NEXTT : RETURN 



82 LOCATE1, 20 :ATTR0,0,B: PRINT" YO 
U HAVE ENTERED TOO MANY CHARACTE 
RS";:ATTR1,0:LOCATE11,2:GOSUB139 
: RETURN 

8 3 LOCATE2 , 20 : ATTR0 , , B : PRINT" FI 
LENAME CAN'T EXCEED 8 CHARACTERS 
" ; : ATTR1 , : GOSUB13 9 : RETURN 

84 CLS: LOCATE 10,0 '.PRINT" PRINT OP 
TION SELECT" : LOCATE10 , 1 : PRINTSTR 
ING$(19,"=") 

85 LOCATE0,3:PRINT"1. STANDARD / 
NORMAL <10 CPI>" : LOCA 

TE0,5:PRINT"2. STANDARD / ITALIC 
<10 CPI>" 

86 LOCATE0,7:PRINT"3. STANDARD / 
N.L.Q <10 CPI>":LOCA 

TE0,9:PRINT"4. STANDARD / N.L.Q. 
/ ITALIC. .<10 CPI>" 

87 LOCATE0,13:PRINT"5. ELITE / N 

ORMAL <12 CPI>" : LOC 

ATE0,15:PRINT"6. ELITE / ITALIC. 
<12 CPI>" 

88 LOCATE0,17:PRINT"7. ELITE / N 

.L.Q <12 CPI":LOCA 

TE0,19:PRINT"8. ELITE / NORMAL / 

ITALIC <12 CPI>" 

89 LOCATE10 ,21: ATTR3 , 2 , B : PRINT" [ 
PRESS KEY DESIRED]"; :ATTR1,0: LOC 
ATE39,22 

90 IN$=INKEY$:ATTR0,0:IN=INSTR(1 
, "12345678" , IN$) : IFIN=0ORIN$=""T 
HEN90 

91 IFW=40ANDIN<=4THENGOSUB139:LO 
CATE0 ,23: ATTR3 , 2 : PRINT" 40 COLUMN 
S CAN ONLY BE LISTED IN 12 CPI"; 
: ATTR1 , : LOCATE3 9 ,23: GOTO90 

92 ON IN GOTO 93,94,95,96,97,98, 
99,100 

93 PRINT#-2,CHR$(27) ;CHR$(19) ; :R 
ETURN 

94 PRINT#-2,CHR$(27) ;CHR$(19) ;CH 
R$(27) ;CHR$(66) ;CHR$(1) ; -.RETURN 

95 PRINT#-2,CHR$(27) ;CHR$(18) ; :R 
ETURN 

96 PRINT#-2,CHR$(27) ;CHR$(18) ;CH 
R$(27) ;CHR$(66) ;CHR$(1) ; :RETURN 

97 PRINT#-2,CHR$(27) ;CHR$(23) ; :R 
ETURN 

98 PRINT#-2,CHR$(27) ;CHR$(23) ;CH 
R$ ( 27 ) ; CHR$ ( 66 ) ; CHR$ ( 1 ) ; : RETURN 

99 PRINT#-2,CHR$(27) ;CHR$(29) ;:R 
ETURN 

100 PRINT#-2,CHR$(27) ;CHR$(29) ;C 
HR$(27) ;CHR$(66) ;CHR$(1) ;:RETURN 

101 CLS: UNLOAD :GOSUB13 9 :LOCATE6, 
10 : ATTR3 , 2 , B : PRINT "DONE . RETURNI 
NG TO MAIN MENU" ;:ATTR1,0: LOCATE 
35 , 10 : FORT=1TO2000 : NEXTT : IFU=-2T 
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HENKILL"N/DAT" :RUNELSERUN 

102 CLS : LOCATE 11,0:ATTR3, 2: PRINT 
"DIRECTORY : " ; : ATTR1, : L 
OCATE3 8 ,f5 i PRINT : PRINT : FORD=3T011 
: DSKI$ , 17 , D, E$ , F$ : F0RG=1T08 : IF 
G<5THENI=(G-1) *32ELSEI= (G-5) *32 

103 IFG=5THENE$=F$ 

104 PL$=MID$(E$, 1+1,8) 

105 IFASC(LEFT$(PL$,1) )=255THEN1 
08 

106 IFASC(LEFT$(PL$,1) )=0THENNEX 
TG,D 

107 H$=MID$ (E$ , 1+9 , 3 ) : PL$ (R) =PL$ 
+ "/ " +H$ : R=R+ 1 : NEXTG , D 

108 O=2:LOCATE0,O:FORD=1TOR-1 

109 ATTR0,0:IFD/3<>INT(D/3)THENP 
RINTPL$ (D) ; " " ;ELSEPRINTPL$ (D) ; 
: 0=0+1 

110 NEXTD:HSTAT Z$ , Zl , Z2 , Y : IFZ2= 
0THENY=Y+lELSEY=Y+2 

111 LOCATE10,Y:PRINTSTRING$(20,4 
2 ) : Yl=Y+2 : Y2=Y1+1 : Y3=Y2+1 : LOCATE 
0,Y1: PRINT "LOAD A FILE, ENTER FI 
LE NAME" : LOCATE0 , Y2 : PRINT"PRESS 
<ENTER> TO ABORT . " ; 

112 LOCATE24 , Y3 : ATTR3 , 2 : PRINT"/D 
AT IS ASSUMED"; : ATTR1,0 : LOCATE0 , 
Y3:ATTR0,0:LINEINPUT"ENTER FILEN 
AME:";F$ 

113 IFLEN(F$)>8THENLOCATE0,Y3:PR 
INT" " : G0T0112ELSEIFF$=" "THEN8 

114 GOSUB140 

115 OPEN "I",#1,F$+".DAT":V=0 

116 LINE INPUT #1,A$:A$(V)=A$:V= 
V+l 

117 M$=MID$(A$(0) ,6,1) :IFM$="*"T 
HENM=1 

118 IFE0F(1)=-1 AND M<>1 THEN 12 
1 

119 IFE0F(l)O-lTHEN124 

120 IF V=67 AND M<>1 THEN121ELSE 
124 

121 GJ=1:CLS:GOSUB13 9:LOCATE6,10 
:ATTR3,3:PRINT"THIS IS NOT A STA 
NDARD FILE"; : ATTR1,0 : L0CATE4 , 12 : 
ATTR3, 3: PRINT "PRINT IT ANYWAY ? 
<Y>ES OR <N>0"; :ATTR1,0:LOCATE38 
,12:ATTR0,0 

122 IN$=INKEY$ : IN=INSTR ( 1 , "YN" , I 
N$) :IFIN=0ORIN$=""THEN122ELSEIFI 
N=1THENG0SUB84ELSEIFIN=2THEN1 

123 IFGJ=1THEN13 3 

124 IFV2=0 ANDV=67THENGOSUB12 6EL 
SEIFV=67 ANDV2=1 THENGOSUB13 5ELS 
EIFV=67 ANDV2=2 THENGOSUB13 3 

125 G0T0116 

126 X$=MID$(A$(0) ,2,2) :W$=MID$(A 
$(0) ,4,2) :N=INSTR(1,A$(0) ,"/") :N 



M$=MID$(A$(0) ,7, (N-l) ) :W=VAL(W$) 
: X=VAL ( X$ ) : G0SUB13 9 : CLS : L0CATE8 , 
0:ATTR3, 2: PRINT" PRINT A FILE FRO 
M DISK"; :ATTR1,0: LOCATE 3 8,0 

127 LOCATE3,3:ATTR0,0:PRINT"THE 
FOLLOWING FILE HAS BEEN LOADED": 
LOCATE 7, 5: PRINT "INTO THE COMPUTE 
RS MEMORY" : LOCATE 14 , 9 : ATTR3 , 2 : PR 
INTNM$ ; : ATTR1 , : LOCATE 3 8 , 7 

128 LOCATE7,ll:ATTR3,2:PRINT"IT 
IS A "; :PRINTW$; : PRINT" COLUMN L 
ISTING" ; : ATTR1 , : L0CATE3 8 , 10 : IFW 
=40THEN129ELSE130 

129 L0CATE8 , 15 : ATTR4 , 5 : PRINT" YOU 
MUST USE 12 C.P.I. "; :ATTR1,0:LO 

CATE10 , 17 : ATTR4 , 5 : PRINT"TO PRINT 
THIS FILE" ; : ATTR1 , : L0CATE3 8 , 17 
:G0T0131 

130 LOCATE10 , 15 : ATTR4 , 5 : PRINT" IT 
IS FORMATTED FOR" ; : ATTR1 , : LOCA 

TE9 , 17 : ATTR4 , 5 : PRINT" PRINTOUT AT 
" ; X ; : PRINT "C.P.I.";: ATTR1 , : LOCA 
TE38,17 

131 ATTR0 , : LOCATE 1 , 22 : PRINT "PRE 
SS ANY KEY TO SELECT PRINTER COD 
ES " : ATTR1 , : L0CATE3 8 , 2 2 

132 ATTR0,0:IFINKEY$=""THEN 132 
ELSE GOSUB 84 

133 CLS : L0CATE7 , 5 : PRINT"POSITION 
PAPER IN PRINTER": LOCATE 13, 7: PR 

INT" PRESS <ENTER>"; : LOCATE 6 , 9 : PR 
INT"TO PRINT THE ENTIRE LISTING" 
; : L0CATE14 , 17 : PRINT"<SPACEBAR>" ; 
:L0CATE5, 19: PRINT" FOR A PAUSE AF 
TER EACH SHEET"; : GOSUB139 : ATTR1, 
0:LOCATE38,19 

134 ATTR0,0:ID$=INKEY$:IFID$=CHR 
$ ( 13 ) THENV2=1ELSEIFID$=" "THENV2 
=2ELSEIFID$=" "THEN134ELSE135 

13 5 CLS:LOCATE14,10:ATTR3,2,B:PR 
INT "NOW PRINTING" ; : ATTR1 , : LOCAT 
E3 5,10:ATTR0,0 

13 6 ATTR0,0:U=U+l:V=0:V4=l:FORT= 
1T066 : PRINT#-2 , A$ (T) : NEXTT : IFEOF 
(1)=-1THEN137ELSEGOSUB140: RETURN 

137 UNLOAD: CLS : LOCATE10 , 10 : ATTR3 
,2:PRINT"PRINTING IS FINISHED"?: 
ATTR1 , : LOCATE 6 , 20 : ATTR0 , , B : PRI 
NT "PRESS ANY KEY FOR MAIN MENU"; 
: ATTR1 , : L0CATE3 8,22: G0SUB13 9 

138 ATTR0,0:IFINKEY$=""THEN13 8EL 
SERUN 

139 FORS=1TO10 : SOUND180 , 1 : NEXT : R 
ETURN 

140 CLS:LOCATE5,10:ATTR3,2,B:PRI 
NT"NOW LOADING PAGE" ;: PRINT (U+l) 
; : PRINT "INTO MEMORY"; :ATTR1,0:LO 
C ATE 3 8,10: ATTR0 , : RETURN 
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Protect and highlight 
gour important 
magazine collection 

with sturdy 
RAINBOW binders 




Distinctive, Durable RAINBOW Binders 

the rainbow is a vital resource to be referred to 
again and again. Keep your copies of the rainbow safe 
in our quality, distinctive binders that provide com- 
plete protection. 

These attractive red vinyl binders showcase your 
collection and ensure your rainbows are in mint 
condition for future use. Each binder is richly em- 
bossed with the magazine's name in gold on the front 
and spine. They make a handsome addition to any 
room. 

Put an End to Clutter 

Organize your workspace with these tasteful bind- 
ers. Spend more time with your CoCo and eliminate 
those frustrating searches for misplaced magazines. 

A set of two binders, which holds a full 12 issues of 
THE rainbow, is only $13.50 (plus $2.50 shipping and 
handling). 

Special Discounts on Past Issues 

To help you complete your collection of the rain- 
bow, we're offering a special discount on past issues 

of the magazine. 

When you place an order for six or more back issues 
of the rainbow at the same time you order binders, 
you are entitled to $1 off the regular back issue price. 
To order, please see the "Back Issue Information" 
page in this issue. 

Know Where to Look 

You may purchase the "Official And Compleat Index 
To THE RAINBOW" for $1 when you purchase a set 
of binders. This comprehensive index of rainbow's 
first three years (July 1981 through July 1984) is 
usually priced at $2.50. 



YES. Please send me 



set(s) of RAINBOW binders 




Take advantage of these special offers with your binder purchase: 

Save $1 off the single issue cover price for back issues. Minimum order of 6 magazines. Please 

enclose a back issue order form from a recent issue indicating magazines wanted. 

Purchase the "Official and Compleat Index to THE RAINBOW" for $1. (Regular price $2.50.) 

(These offers good only with the purchase of a rainbow binder set) 

Name 

Address . 

City 



State 



ZIP 



□ My check in the amount of is enclosed. (In order to hold down costs, we do not bill.) 

Charge to: □ VISA □ MasterCard □ American Express 

Account Number Expiration Date 

Signature 

Mail to: Rainbow Binders, The Falsoft Building, P.O. Box 385, Prospect, KY 40059. 

Binders are $13.50 per two-binder set plus $2.50 shipping and handling. If your order is to be sent via U.S. mail to 
a post office box or foreign country, please add $2. Kentucky residents add 5% sales tax. U.S. currency only, please. 
In order to hold down non-editorial costs, we do not bill. 

For credit card orders call (800) 847-0309, 8 a.m. to 5 p.m. EST 
All other inquiries call (502) 228-4492. 



(A 



Thanks for the Memory 



By Thomas Kocourek and 
Kenneth Rockwell 



Many programs have been writ- 
ten to use the full 64K of the 
CoCo. These programs are 
often clumsy to use or have dubious 
value. New Boots is a utility program 
written for the 64K. CoCo. It is easy to 
use and will work on either disk or 
cassette systems. 

"Why," you might ask, "do we need 
another 64K program?" Because there 
are times when you need maximum 
memory. A good example is Colorkit by 
Prickly-Pear Software. This machine 
language utility usually occupies the 
upper 5K of memory in a 32K CoCo. 
The memory is normally lost to you. 
But if you use New Boots to load Color- 
kit with an offset to &HE000, you gain 
the memory back, along with an addi- 
tional bonus. You can run your BASIC 
program and not worry about scram- 
bling Colorkit. Other position- 
independent-coded, machine language 
programs can be loaded in a similar 
manner. How do you know if an ML 
program is position-independent? Load 
il with a small offset and execute it (i.e., 
type LOflDM or CLOF\Dn"program 
name",512). If the program works, it is 
position-independent. 

Upon pressing the reset button, you 
will lose the 64K. mode. To remedy this 
annoyance, we've written an automatic 
re-boot to 64K routine and incorpo- 
rated it into NewBoots. To disable this 
feature, you must cold start the CoCo 
(via POKE113,0 and pressing ENTER 

Thomas Kocourek is an electronics 
technician who enjoys sharing his two 
CoCos with his family. Kenneth Rock- 
well bought his first Color Computer 
five years ago to use in his heating and 
air conditioning business, and he 's been 
a CoCo nut ever since. 
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and reset, or shutting off the power). 
How It Works 

The first thing NewBoots does is copy 
the BASIC ROMs into the high RAM 
bank. This is achieved by the short ML 
routine in lines 26 to 31, which is no 
longer needed once BASIC has been 
copied. 

Lines 35, 39, 43 and 48 poke new 
values into parts of the Color BASIC 
ROM area. Line 35 changes the cursor 
to a "checkerboard" pattern instead of 
a solid block; you can substitute a code 
between 128 and 143 to change the 
cursor pattern. Line 39 changes the 
cursor flashing rate; Line 43 sets the 
system to cycle through each available 
cursor pattern. Line 48 changes the 
prompt message from "OK" to "go" by 
poking the ASCII codes for 'g' and 'o' 
into the BASIC prompt location. 

Lines 56 to 79 let you change the 
start-up message that appears when a 
cold start is performed. Line 56 checks 
to see if Disk BASIC 1.0, 1.1 or J DOS 
1.11 are present (or if there is no disk 
ROM); lines 58, 61, 64 and 67 set the 
appropriate start address for the start- 
up message in each version. Line 72 puts 
the new message in AS. Lines 76 to 79 
poke the new message into the proper 
place in the disk (or Extended BASIC) 
ROM area. 

The last step is to insert a patch in the 
lower 32K area, to switch the high 
RAM bank back in when the reset 
button is pressed (which usually 
switches the ROMs back in). This way 
the patches will still be effective. Lines 
84 to 87 poke in and execute a short ML 
routine to do just that. Finally, Line 93 
executes a ROM routine to clear the 
screen and then performs a warm start 
of BASIC to put the patches into ef- 
fect. □ 





The listing: NEWBOOTS 



49 
50 
51 
52 
53 
54 
55 



i i i > i i • 



i i i i i i i i i i i i i i i i i 



BOOT A CUSTOM PROMPT AND 

CURSOR WITH 64K RAM 

FROM TOM KOCOUREK 

AND KEN ROCKWELL 

RT2, BOX54 

EMERSON, G A 

FOR RS DISK 1.0, 1.1, 

JDOS 1.11 & EXT. BASIC 
i • i i * i i i i i i ■ i i i ■ i i i i i i i i i i 

SETUP BASIC FOR AUTO BOOT 



i i i i i i i r 



i i i i i i i i i i i i i i i i I 



10 
11 
12 
13 
14 
15 
16 
17 
18 
19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

1 

31 DATA183, 255, 223, 28,175, 57 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 



CLEAR200, 32761 

i i i i i i i i t i i i i i i i i i i i i i i i t i i i i 

64K BOOT OVER ROUTINE 
i i i i i t i i i i i i i i i i i i i i i i i i i i i i i 

FOR A=12288 TO 12313 :READ B 
POKE A,B:NEXT:EXEC12288 
DATA2 6, 80, 142, 128, 0,2 3 6, 132 
DATA183,255,2 23,2 3 7,129,183 
DATA255,222,140,254,2 55,37,24 



i i i 



i 



i i i i i i i i i i i i i i i i i i i i • 

REDEFINE THE CURSOR 
> i i i i i i i i i i i i i i i i i i i i i i i i 



i i 



POKE41384,134 
i i i i i i i i i i i t i i i • i i i i i i i i i i i i 

CHANGE CURSOR FLASHING RATE 
i i i i t i t i i i i i t i i i i i i i i i « i i i i i 

POKE41374,5:POKE41388,9 
i i t i i i i i i i i i i i i i i i i i i i i i i i i i 

CHANGE CURSOR PATTERNS BY 1 
• i i i i i i i • i i i i i i i i i i i i i i i « i i i 

POKE41382,l ^ 

i i i i i * i i i i i i i i i i i i i i i • i i i i i i 

CHANGE PROMPT FROM "OK" 
TO "go" 



i i i i i i i i i i i i i i i i i i i i 



• til 



48 POKE44014,103:POKE44015,111 



i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

YOU CAN MAKE A START-UP 
MESSAGE OF A$ WITH NO MORE 
CHARACTERS THEN 86 FOR DISK 

OR 81 FOR EXTENDED BASIC 

OR 75 FOR JDOS 1.11 
i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

56 A=PEEK(49446) :IFA=144THEN58EL 
SEIFA=68THEN61ELSEIFA=2 51THEN64E 
LSE67 

57 ' COME HERE IF RS DISK 1.1 

58 A=86:S=49465:E=49551:GOT072 

59 i i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

60 ' COME HERE IF RS DISK 1.0 



61 A=86:S=49446:E=49532:GOT072 

62 • • • i i i • • i i • i i i i i i i i i i i i i i i i i i 

63 ' COME HERE IF JDOS 1.11 

64 A=76:S=49182:E=49258:GOT072 

65 i i i i i t i i i t i i i i i i i i i i i i i i i i i i i 

66 ' COME HERE IF EXTENDED BASIC 

67 A=81:S=33000:E=33081 

gg i i i i i i i I i i i i i I i i i i I i i i i i i i i i i 

69 ' PUT YOUR MESSAGE IN THE 

70 ' NEXT LINE AS "A$= " 

72 i i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

72 A$=" CUSTOM 64K RAM" 

73 i i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

74 I POKE MESSAGE INTO BASIC 

75 i i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

76 IFLEN(A$)<A THENA$=A$+STRING$ 
(A-LEN(A$) ,32)ELSEIFLEN(A$)>A TH 
EN A$=LEFT$(A$,A) 

7 7 FOR Z=S TO (E-l) 

78 POKE Z,ASC(MID$(A$, (Z+1)-S,l) 

) 

7 9 NEXTZ 

8 i i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

81 ' AUTO BOOT ON RESET ROUTINE 

82 I I I I II M I I I II I I I 1 I I I I I I I I I I M 

83 DATA 52, 23, 142, 127, 249, 1 
34, 126, 167, 4, 220, 114, 237, 
5, 134, 183, 167, 1, 204, 255, 2 
23 

84 DATA 237, 2, 134, 18, 167, 0, 
159, 114, 48, 30, 159, 35, 159, 
39, 204, 159, 114, 190, 192, 

85 DATA 140, 68, 75, 38, 5, 142, 
192, 0, 32, 3, 142, 128, 0, 48, 
1, 16, 163, 132, 38, 249 

86 DATA 204, 18, 18, 237, 132, 
53, 151 

87 FORA=12288T012354:READB:POKEA 
,B:NEXTA:EXEC12288 

88 ■ USE THIS LINE FOR LOADING 

YOUR M/L PROGRAM. 

89 i I » I I l I I I I I I I I i » i i i i I I i i I i i I I 

90 ' DO A "CLS" AND THEN A 

91 ' WARM RE-START OF BASIC 

92 • i < i < i i • i • i i •> i i i i i i i i i i i i i i i 

93 EXEC43304:EXEC32770 
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Avoiding Hang-Ups in the 
All-RAM Mode 



By Dan Downard 
Rainbow Contributing Editor 



Using Auto-Start on DOS [RAIN- 
BOW, November '84 j, I boot up Track 
40 and Disk Menu. A problem exists 
with MLprograms that exit by jumping 
to address SFFFE. Under normal con- 
ditions, this address should be a reset 
vector but, since I am operating in the 
all-RA M mode, jumping to this address 
prints garbage on the screen and hangs 
up the computer. Where would this 
address be placed, and what does the 
memory map look like in the all- RAM 
mode? 

Wayne C. Bell 
Bangor, PA 

Wayne, if you look at address SFFFE 
in memory, you will notice that it 
contains SA027. This is the warm start 
address for BASIC. There is one catch, 
though. You must first clear $71, the 
warm start flag. Try something like this: 

CLR $71 
JMP $0027 

In BASIC this is where the infamous 
POKE113,0:EXEC40999 comes from. 
Unfortunately, on the CoCo 3 this trick 
does not do a true cold start. 



Dan Downard is an electrical engineer 
and has been involved in electronics for 
27 years through Ham radio (K4KWT). 
His interest in computers began about 
eight years ago, and he has built several 
68 XX systems. 



Telecommunications Help 

/ currently have a CoCo 3, FD 501 
Disk Drive, DMP-I05 Printer and a 
DCM-3 Direct Connect Modem. I have 
asked my local Radio Shack dealer 
what else I need in order to upload/ 
download programs via telecommuni- 
cations, and they could not give me a 
solid answer. Can you help? 

Chuck Katsekes 
Newport, NC 

Besides a cable between your modem 
and CoCo, all you need is a terminal 
(communications) program. If you buy 
the RS-232 pack, there is a terminal 
program built in, but it's not very good. 
1 would recommend a terminal program 
with Xmodem protocol for reliable 
downloading. 



Artifact Colors on CoCo 3 

At Christmas lime I upgraded from 
a CoCo 2 system to CoCo 3 with an 
RGB CM-8 monitor I like very much. 
However, to my disappointment, many 
of the games I liked on the CoCo 2 won V 
run right on my new system. Some 
won V load at all and others load and 
run, but without color. 

Since the reason 1 don 't have color on 
some of the games is the RGB monitor 
and since 1 have the TV from my CoCo 
2 system and since the CoCo 3 has both 



a place for the monitor to connect to 
and a place for a TV to connect to, can 
I hook both of them up at the same time 
and then just turn on whichever one I 
want to use? Or will there be a problem, 
such as one cutting the other out or 
perhaps the hookup damaging the 
CoCo? 

William Cotton Jr. 
Malad, ID 



It won't hurt your computer to use all 
three of the video outputs at one time, 
William. However, a program has been 
developed to simulate artifacted colors 
on your CM-8. Check the Spectrum 
Projects ad for RGB Patch. 



Disk Run-On 



/ own a CoCo 2 with 'F' board and 
recently purchased a disk drive from 
True Data Products. The drive is a Teac 
55 B with hard drive controller. Disk 
Extended Color BASIC 1.0. The two 
sides are accessed as Drive and Drive 
I. The problem is that when I either 
insert or extract the disk, the motor runs 
for about 10 seconds on its own before 
the lever is engaged. Is this normal? Will 
it harm the drive if I engage with the 
motor running? 

Richard Christenson 
Ellendale. ND 
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Richard, this is the normal way your 
disk should operate. The disk motor is 
turned on for a few seconds to allow the 
drive to get up to speed before any 
operation takes place. It is again de- 
layed after each operation to prevent it 
from being turned off in case another 
operation follows. It will not hurt your 
drive; in fact, it helps by not turning it 
on and off so much. 



VIP Underlining 



/ have an unusual problem with my 
word processing program fVIP Writer ). 
It 's a very good software program for 
word processing but. when I print any 
output to my printer (Smith-Corona L- 
1000 daisy wheel), I cannot get any 
words underlined. I've tried all of the 
program 's underlining procedures and 
changing the printer's ASC formats, all 
to no avail. Any ideas? 

Randall E. Berkland 
Yokota Air Base, Japan 

To get the underline, you have to use 
embedded commands depending on the 
printer being used. See the next letter, 
Randall. 



Underlines for Spaces 

Following the instructions in my 64 K 
Co Co. Telewriter 64, and Tandy DWP- 
220 printer manuals, and pursuant to a 
telephone call to Telewriter 's office in 
California, I have inserted the suggested 
embedded format commands in my 
CoCo (at 600 baud) and have obtained 
underlining; however, my underlining is 
only printed directly under each word. 
What I am getting now is: 

underlines under each word 

when, in fact, what I want is: 

underlines including the spaces be- 
tween words. 

The embedded commands are "caret 
Dl 15" followed by "caret D2 14." Can 
you give me a new embedded command 
that will allow me to underline the 
spaces between words also? Other than 
this fault, I am highly pleased with the 
power of the Telewriter 64. CoCo, and 
Tandy DWP-220 combination, and I 
use them in my business as well as home 
as our prime word processor. 

Bill Hodges 
Columbia, SC 



Thanks for the tip. Bill. We have had 
several people ask this question. I'm 
sorry, but I don't have the answer. We'll 
see if any of our other readers have 
solved your problem! At the same time, 
keep in mind that the majority of print- 
ers use different control codes. 



Variable Passing 

/ think I can help with your answer 
to Warren Cole [February '87]. I re- 
cently did a review of a new utility that 
would give Warren exactly what he 
asked for without OS-9. I tested Vari- 
save on an 'F' board CoCo I, CoCo 2 
and CoCo 3. It works on all three and 
allows you to run a new program while 
saving variables (names and data — 
string and numeric — arrays or not) 
from a previous program. It simulates 
the CHRIN command. 

Larry Elman 
Port Jefferson Station, NY 



Thanks for the help, Larry. I have 
since read the review, and you are 
correct. Varisave will indeed allow the 
passing of variables. 

Several other readers suggested using 
the unused graphics pages with peeks 
and pokes to save variables. Where 
there's a will, there's a way. 



A Question Trio 



/ am having a problem with disk 
labels. After several weeks, sometimes 
sooner, the labels begin peeling off the 
disk, at the edges. This causes some 
further peeling when the disk is inserted 
into the disk drive. I tried pressing on 
the label more ardently, holding my 
hand against the label (so the body heat 
might set the label better), and don't 
know what else to do to keep them on 
the disks. 

Another problem is that I have re- 
cently entered the field of OS-9 pro- 
grams and have several disks with these 
on them. I would like to have a printed 
"disk-list, " or inventory, of these pro- 
grams, hut all / get when 1 try to make 



one is a series of blue lines on the screen, 
and garbage if I try to print the list of 
programs. 

Now, my third and last question. I try 
to keep the CoCo clean and covered 
when not in use. When I first turn it on, 
I also have the DM P-130 printer and 
the two disk drives turned on. I am 
using a color television as a monitor. 
When the CoCo is turned on, the screen 
is supposed to be green, but shows a 
white screen instead. Hitting the reset 
button several times, or turning the 
CoCo off and back on, usually gets the 
screen green. I have opened the CoCo 
case and cleaned the interior of the unit 
several times, so that does not appear 
to be the problem. I also removed the 
disk drives and the printer, in order to 
track down the culprit, but still have the 
same problem. 

M.L. Braun 
Bellevue. OH 



I have finally found a solution to your 
disk label problems. Find a felt-tip pen 
with a light colored ink. Write directly 
on the disk jacket. We use this method 
here at the RAINBOW, and it seems to 
work fine. Needless to say, don't press 
too hard! 

You must have OS-9 to list these 
directories, M.L. After booting OS-9, 
just enter the command DIR 'DO >'P 
and you will get a printed disk directory 
of your working directory. 

As far as your white screen is con- 
cerned, it sounds to me like your color 
burst signal is a little out of tolerance. 
There is a trimmer capacitor next to the 
crystal that can be adjusted, along with 
a few coils in the RF compartment. 



Your technical questions are welcomed. 
Please address them to: Downloads, THE 
rainbow, P.O. Box 385, Prospect, KY 
40059. We reserve the right to publish only 
questions of general interest and to edit for 
space and clarity. Due to the large volume 
of mail we receive, we are unable to answer 
letters individually. 

Your technical questions may also be sent 
to us through our Delphi CoCo SIG. From 
the CoCo SIG> prompt, pick Rainbow 
Magazine Services, then, at the RAIN- 
BOW> prompt, type fiSK (for Ask the 
Experts) to arrive at the EXPERTS> 
prompt, where you can select the "Down- 
loads" online form which has complete 
instructions. 
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Those Great RAINBOW Programs 

Without All the Fuss! 
Subscribe to RAINBOW ON TAPE! 



Every month, rainbow on tape brings as many as two dozen ready-to-run 
programs right to you. Using the current issue of the rainbow as documen- 
tation, all you have to do is load and run them. Just a one-year subscription 
gives you more than 230 new programs! The typing time saved is time that 
can be spent with the CoCo. (rainbow on tape does not include OS-9 
programs or those less than 20 lines.) 



Need a back issue of rainbow on tape? 
Issues available beginning with April 1982 



Subscribe to rainbow on tape Today! 

LOOK FOR OUR ORDER CARD 
BETWEEN PAGES 34 AND 35 

The cost for a single copy of rainbow on 
tape is $10 within the United States; U.S. $12 
in all other countries. The annual subscription 
rate for rainbow on tape is $80 within the U.S.; 
U.S. $90 in Canada; and U.S. $105 for all other 
countries. U.S. currency only, please. In order 
to hold down non-editorial costs, we do not 
bill. 




DISK USERS'. RAINBOW ON DISK 
IS NOW AVAILABLE! 

All the programs from the rainbow — includ- 
ing OS-9 — are now available on disk. For 
more information, see Page 158 of this issue. 



NOW AVAILABLE ON DELPHI! 

For your convenience, rainbow on tape can also be 
ordered via the Delphi Information Network, in our Shopping 
Service area of THE rainbow's Color Computer SIG (Special 
Interest Group). 

The individual programs from our past May issues are also 
available for immediate download in the RAINBOW ON TAPE 
Database area in THE rainbow's Color Computer SIG on 
Delphi. There is a $3.50 per program surcharge. 



RAINBOW ON TAPE is not a stand-alone product, but is 
intended as an adjunct and complement to the magazine. 
Even if you purchase RAINBOW ON TAPE, you will still need 
the magazine for loading and operating instructions. 

To order by phone, {credit card orders only) call 
(800) 847-0309, 8 a.m. - 5 p.m. EST. All other 
inquiries call (502) 228-4492 



Programs From Our Past Printer Issues: 

May 1 986 — Home Sweet Home, a program that demonstrates 
PRINT e statements; Message Maker, a printer utility to post 
a bulletin; Word*, a game to aid in designing your own 
crossword puzzles; Flags, a graphics program that displays 
five anthems and flags of the world; Picture Calendar, a 
graphics program to design your own calendar pin-up; Card 
File, organizes baseball cards by teams or players; Picprt, a 
graphics utility that prints out graphics pictures, charts or 
graphs in various different sizes; 64K Custom Setup, an aid 
for LLISTing programs; Print Stylist, a utility that sets print 
style combinations available on the Epson printer; Delights, 
six short utilities to make printing easier; Label Maker, a 
program to organize any disk collection; Rotate, prints wide 
documents on narrow printers; and Banner, a utility to print 
old-fashioned lettering for exciting banners. Plus seven 
additional programs. 

May 1985 — Pictures Perfect, two screen dumps for small and 
large printed images; Numberjack, a memory game for 
preschoolers to adults; DIRECT, organizes your tape collec- 
tion; Two-Column, prints program listings in two columns; 
Gemini Screen Print, a screen dump that puts graphics onto 
paper; KwikDraw, a graphics program to incorporate pictures 
created with drawing utilities into BASIC programs; Script, a 
graphics printer utility that prints in script; Putting the Okidata 
ML92 to Work, printer utilities to provide a simple interface 
with the CoCo; Rat Maze, a two-dimensional maze game; 
Formatter, helps debug and make nice-looking listings; Eye 
Q, game to test IQ by solving clues; and Purchase Order, a 
printer utility that sets up purchase orders and records mail 
orders. Plus seven additional programs. 

Plus 1 8 programs from our May 1984 issue of THE RAINBOW. 




CoCo3 




OS-9 MEMORY 



The Advantage of Processes 



By Peter Dibble 



You've squeezed as hard as you can and your 
program still needs 200K. You have your CoCo 
3 stuffed with memory all the way up to 512K, 
so there's plenty of memory there, but you can only 
apply 64K of it to your problem. What can you do? 

You need more than one process to solve your 
problem. Each process gets its own address space. You 
need 200K? You might be able to divide your program 
among five 40K address spaces. 

It isn't too hard to slice a program into several 
processes. The trick is communication among the 
processes. The more restricted the communication, 
the better the resulting system will work. In this article 
I'll discuss cases that require simple one-way commu- 
nication. 

Passing Parameters Through the Shell 

If you can cut out part of the program that does 
a piece of work but doesn't have any effect on the rest 
of the program, you can easily make a process of it. 
Write it as a separate program and pass it any data 
it needs as parameters. 

Be sure not to pass any pointers between processes. 
Remember that each process gets its own address 
space. Any pointers you pass will have no meaning 
in another address space. 

A text editor or terminal program might want to 
start a process to do printing. By starting a separate 
process, you save space. You can also get printing in 
the background while you continue to work. I've 
included a set of BAS1C09 programs that print a buffer. 
They're simple, but you can probably imagine more 
complicated versions. 

If you want to try the demonstration program, type 
in the two procedures, save them, and pack the 
program printer.'When you run editor, it sends the 



Peter Dibble has a bachelor's degree in chemistry and 
is currently a graduate student in computer science. 
He has worked as an applications programmer, 
systems programmer and as the user services assistant 
director for the University of Rochester Computing 
Center. With Dale Puckett, he is the co-author of 'The 
Complete Rainbow Guide to OS-9. 



text buffer to the shell. This sends it to the program 
called printer, which displays it on your screen. 

You might want to experiment with adding an 
ampersand (&) at the end of cmd_line before you 
invoke shell in the editor procedure. 

Passing parameters through the BASIC09 shell 
command doesn't work very well. The problem is that 
the OS-9 shell gets into the act. You can only pass very 
ordinary text through the shell. In the example 
program, I had to replace carriage returns and 
exclamation points with alternate characters to 
prevent the shell from seeing them and getting excited. 
There is no such problem if you use the OS-9 FSFork 
system call from assembler or C. 

Simple Pipes 

You can get as many processes as you like involved 
with a problem without writing any special code if you 
use pipes through the shell. There is no popular 
example of this technique, but I have seen the 
Microware C compiler run with pipes between its 
phases. It is fast! Let's look at the C compiler in more 
detail. 

Programs in C are converted to program modules 
by a sequence of operations: 

• The preprocessor includes files and expands mac- 
ros. 

• The compiler itself converts the output of the 
preprocessor to assembly language in one or two 
passes (depending on whether you use the Level I 
or II version). 

• The optimizer does some simple improvements on 
the assembly language. 

• The assembler takes the output of the optimizer and 
converts it to a relocatable object file. 

• The linker converts that to an executable module. 

What you really want is something that makes an 
executable module from a C program. The five or six 
steps are there for Microware's convenience, not for 
yours. There are various reasons for cutting the 
process into pieces, but on a 6809 there is a compelling 
reason. A C compiler in one piece would not fit in 64K. 

Pipes through the shell work for the C compiler, 
because data flows through the program in one 
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direction. If the linker had to feed data to the 
preprocessor, hooking the C compiler together would 
have been difficult. 

A spelling checker is another example of something 
that can be broken into pieces connected by pipes. The 
input is the file you want to check. The output is a 
list of misspelled words. The steps are: 

• Break the file into words 

• Sort the words 

• Remove redundant copies of words 

• Merge the words with a dictionary keeping only 
words that don't match 



The output is a list of words that weren't in the 
dictionary. 

Any number of business problems break into pieces 
that can be joined with pipes. Text processors are also 
good candidates. 

That's about all we can do without leaving BASIC09. 
Next time I'll show you some tricks that use assembly 
language. I'll do them as subroutines you can call from 
BASIC09 so you don't need to be an assembly language 
programmer to use them. □ 



Listing 1: editor 



PROCEDURE 

0000 

003B 
0076 
00B1 
00EC 
0119 
0120 
0152 
0169 
0193 
01BB 
01F6 
0231 
026C 
02A7 
02B8 
02BD 
02C9 
02D4 
030F 
034A 
0385 
03C0 

03EB 
03F0 
040E 
0447 
046C 
0493 
04AE 



editor 
( * *) 

(* This program pretends to be part of a text editor that*) 
(* starts a process to print a buffer. *) 

( * *) 

DIM cmd_line: STRING [500] \(* Build the print buffer here *) 

DIM i: INTEGER 

DIM InStr: STRING [40] 

DIM DataLength: INTEGER 

DataLength=ll 

cmd line="" 



\(* For reading data statements *] 

\(* A constant *; 

\(* Number of strings in DATA *] 

\(* Initialize the print buffer *] 



( * 

(* Read the text from data statements. 
(* real editor wouldn't do this. 



Of course, a 






( * 

FOR i=l TO DataLength 
READ InStr 
cmd_l ine=cmd_l ine+InStr 

NEXT i 
( * 

(* Finish off the command line. It will look something * 
(* like: printer (50, "...") * 



( * 

cmd_line="printer " + " ("+STR$ (LEN(cmd_line) +1) +" , ' 

+cmd_line+""") " 
SHELL cmd_line 

DATA "Alias, poor Yorick| " , CHR$ (6) 

DATA "I knew him, Horatio,"," a fellow of infinite jest," 
DATA CHR$(6)," of most excellent fancy." 
DATA CHR$(6),"He hath bore me on his back " 
DATA "a thousand times" , CHR$ (6) 
DATA " From Hamlet by Shakespeare" 



Listing 2: printer 



PROCEDURE Printer 
0000 
003B 
0076 
00B1 



( * 

(* This demonstrates the form of a program that would 
(* print a buffer. It should be called with a command 
(* line of the form: printer (length, buffer) 



.*) 

*) 
*) 

*) 
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00EC 




-*) 


(* - - - 


J3127 


PARAM Length: INTEGER 




012E 




-*) 


I* - - 


0169 


(* It is easier to work with an array of bytes than a 


*; 


01A4 


(* string so lie to OS-9. Declare the second parameter 


*) 


01DF 


(* as an array. 


*) 


021A 




-*) 


\ 


0255 


PARAM buffer ( 501 ): BYTE 




0261 


DIM i: INTEGER 




0268 
029F 


FOR i=l TO Length \(* Print each character from buffer 


*) 






02D8 


(* Carriage returns and exclamation points don't pass 


*) 


0311 


(* through SHELL well, so they come in as | and chr 6 


*) 


034A 


(* This loop converts them back to <cr> and ! before 


*) 


0383 


(* printing them. 


*) 


03BC 




-*) 




03F5 


IF buffer (i) =6 THEN 




0404 


buffer(i)=13 




040F 


ENDIF 




0411 


IF buffer (i)=ASC(" |") THEN 




0422 


buffer(i)=ASC("!") 




042F 


ENDIF 




0431 


PRINT CHR$ (buffer ( i) ) ; \(* Print one character 


*) 


043B 


NEXT i 




0446 


PRINT \(* Close with a new line 


*) 


0463 


BYE 


/R\ 




"COULDN'T YOU HAVE BOUGHT A QUIETER PRINTER, 
DAD? I CANT HEAR MY TWISTED SISTER' ALBUM!" 



It's here 
at last: 



Our 

Fourth 
Rainbow 
Adventure 
Contest 






For details, 
see Page 159 
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OS-9 UTILITY 



A Pause for Thought 



By Paul Ladouceur 




any times I have been working away with my OS-9 system only 
to make a mistake that locks up my computer. This could 
have been avoided if I had had the chance to catch my 
breath and think about what I should do next. Thus 
was born the idea for Pause, a command that 
allows pausing between job steps in a pro- 
cedure file until a key is pressed. It is similar 
to the MS-DOS Pause command used in 
batch files. It is handy for putting a message 
on the screen to stop that headlong night 
into lock-up. 

The syntax is pause "message" or just 
pause, where message is any notes you 
want displayed before the "press any key 
when ready" prompt. The message can be 
as long as 52 characters and must contain 
only letters, not numbers. Pressing any 
key (except BREAK) continues the proce- 
dure, and pressing BREAK will, as usual, 
abort the procedure file. 
Pause was written using assembly lan- 
guage and should work on anv OS-9 Level 
I system. It is well-commented, and I hope 
you find it as useful as I have. 
(Questions about this utility may be directed 
to the author at 75 Schoolhouse Road. Levit- 
town, NY 11756. Please enclose an SASE for a 
>ly when writing.) □ 

Paul Ladouceur lives in Levittown. New York, and holds 

bachelor's degree in computer science. A programmer for an 

insurance company, he enjoys working with his CoCo. 



The listing: pause 

* Pause command : used for pausing Proc files 

* 68^9 Assembly Language 

* for Color Computer 

* Should work on any 68p9 Machine 

* Written by Paul Ladouceur (c) July 1986 

* ex 0S9: Pause 

* 0S9: Pause "message" 

nam PAUSE 
ifpl 
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use 


/d0/defs/Os9DEfs 


* Write to /Term 




endc 






stdmes leax Mesl,pcr get addr of mesl 










ldy 
0s9 


•fMlenl get len of mesl 
ISWrite write message to screen 




mod 


Prglen, Prgn 


am, Type, Revs, Pr start, Size 


Type 


set 


Pr grin -rOb jet 




bcs 


error 


Revs 


set 


ReEnt+1 








Prgnam 


fcs 


/Pause/ 




* Read from /T 
leax 


arm till there is a character 
Buf,u keybroad buffer 




org 

rmb 


P 




ldy 


#1 get 1 char 


3uf 


2 




Os9 


ISRead read keyboard wait for char 


Count 


rmb 


1 




bcs 


error 




rmb 


2$p stack 




bsr 


Linefeed 




rmb 


52 parm 


message characters 






Size 


equ 


■ 




* Close /Term 
0s9 


and go back to stdin/stdout 
ISClose 


* open path 






bcs 


error 


Prstart 


TFR 


X,Y 


store parm addr 








leax 


f ilnam,pcr 


device terminal 


* NO ERROR 






Ida 


#Updat. 


read from term not proc 


clrb 


** no error ** 




0s9 


I$Open 


open to terminal 


bra 


noerror 




bcs 


error 




error ldb 


42ji3 


* 


sta 


Ipath 


output path in A register 


noerror 0s9 


FSExit 


*Test foi 


special message 




* SUBROUTINES 






TFR 


¥,X 


ge- back parm addr 








ldb 


0.x 


get 1st char 


Linefeed leax 


Lfdata, per 




cmpb 


*'" 


something in quotes 


Ldy 


#2 2 character to write 




bna 


stdmes 


?no 


0s9 


ISWrite linefeed screen line 




clrb 




initialize b 


bcs 


error 




stb- 


Count, u 


initialize count 


rts 






ldy 


|1 


# of char to write 








leax 


1,X 


addr of 1st char 


**** CONSTANTS 


****** 


Loopwt 


ldb 


.x 


get char 








cmpb 


fin 


end quote yet? 


* MESSAGE 






beq 


LF 


?yes 


Mesl fee 


/Press any key when ready / 




ldb 


Count, u 


get char count 


Mlenl equ 


*-Mesl 




incb 




add 1 to count 


* FILE NAME 






cmpb 


«52 


52 char max 


filnam fcs 


"/TERM" 




bhi 


LF 


?yes 


* SCREEN Cntrol 




stb 


Count , u 


store count 


Lfdata feb 


S0d,S0a 




0S9 


ISWrite 


write mesage 








bcs 


error 




emod 






leax 


l,x 


add 1 to parm addr 


Prglen equ 


* 




bra 


Loopwt 




End 


/R\ 


LF 


Bsr 


Linefeed 








PRICKLY-PEAR SOFTWARE 

QUALITY PROGRAMS FOR YOUR COCO I, II & 

HALL OF THE KING TRILOGY 

HALL OF THE KING III is finally here to complete the most extensive trio of two 
disk adventures ever available for the color computer. Amazing hi-res graphics 
fill your screen as you follow your quest for the Earthstone. HALL OF THE KING 
I, II, & III may be played separately for a great challenge and wonderful entertain- 
ment. The Rainbow review of 9/86 called Hall of the King II a "Winner" while 6/86 
Rainbow review called Hall of the King I "one of the best adventure programs I 
have experienced to date". Try one or all of the Hall of the King series. Each 
adventure is priced at $39.95 if purchased separately. You may order all three for 
a package price of $99.95. If you are one of the lucky adventurers who has 
already purchased Hall I & II, send proof of purchase (invoice, cancelled check, 
etc.) and receive a $10.00 discount on the new HALL OF THE KING III. The Hall 
of the King series is compatible with all versions of the Color Computer in- 
cluding the COCO III. Requires 64K and 1 disk drive. 



f 2/ftt? 




WARP FACTOR X (Rainbow Review 2/86) S34.95 
DARKMOOR HOLD (Rainbow Review 8/86) S29.95 
DOLLAR WISE Requires 32K Tape $24.95 — Disk S27.95 



FONTFILE — (New for the COCO III) $24.95. 
DRAGON BLADE (Rainbow Review 11186) 
Animated Graphics Adventure $29.95 



POLICY ON PROTECTION 
We believe our customers are honesl —allot our software can be backed up us 
mg standard backup procedures 

Your Personal cneck is welcome - no delay Include St SO shipping (or each 
order TX residents add 6 l/4'c sales lax. Orders shipped within two days 
Dealer and author inouiries are always welcome Canadian dealers should con. 
tact Kelly Software Distributors, Ltd. 608. STNT, Calgary. Albena T5H 2H2. (4031 
236-216t 



For a complete listing of all our programs call or 

write for our free catalog. 

PRICKLY-PEAR SOFTWARE 

213 La Mirada • El Paso, Texas 79932 >'•' 

(915)584-7784 "" 
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KISSable OS-9 



Setting the Stage 
for OS-9 Level II 



By Dale L. Puckett 
Rainbow Contributing Editor 



Bill Brady's latest communication 
program, Wiz, is the first third- 
party product we've seen that 
captures part of the power built into the 
just-released CoCo Version of OS-9 
Level II. Wiz will sell for S79.95 at FHL 
in Syracuse, New York. 

CoCo 2 owners who are running OS- 
9 Level I, Version 2 will be interested in 
Brady's BigT. BigT is Wiz without the 
Level II windows and is an excellent 
communications program. You can 
download the binary version of BigT 
from both Delphi and CompuServe. A 
$20 donation to William Brady, 4776- 
B Carmody Court, Harwood. MD 
20776, will bring you a printed copy of 
the manual and the source code. 

If you love the many online confer- 
ences on rainbow's OS-9 SIG, you'll 
find this program is a dream come true. 
While in a conference, you type your 
part of the conversation in a small 
window at the bottom of the screen. 
Your great thoughts stay put and can be 
edited in that window until you press 
the ENTER key. While you're typing in 
your private window, you can read all 
conference chatter in Wiz's main win- 
dow. When you press ENTER, Wiz sends 
your thought to Delphi. It appears in 

Dale L. Puckett, who is author of The 
Official BASIC09 Tour Guide and 
coauthor, with Peter Dibble, of The 
Official Rainbow Guide to OS-9, is a 
free-lance writer and programmer. He 
serves as director-at-large of the OS-9 
Users Group and is a member of the 
Computer Press Association. Dale 
works as a U.S. Coast Guard lieutenant 
and lives on Governors Island in New 
York Harbor. 



the main Wiz window when Delphi 
sends it to everyone in the conference. 

In the meantime, a one-line status 
window at the top of the screen lets you 
know how many minutes you have been 
online and reports your current com- 
munications parameters. If you need to 
do something else with your computer 
for a second, you can tell Wiz to wait, 
and go about your business. When you 
do this, the special Wiz output path to 
your RS-232 port is closed. Here's a 
possible use: 

You're reading the Forum messages 
on Delphi and learn that someone needs 
help finding the ident of a module. If 
you want to help, you can start your 
reply to the question while online with 
Wiz, then tell Wiz to wait temporarily. 
At this time you can redirect the output 
of your OS-9 ident utility command to 
your /T2 device descriptor. This will 
send the report to Delphi where it will 
be inserted in your message. As soon as 
the ident command is finished, you 
can bring Wiz back to life and add any 
comments. Amazing! 

Why Wiz Is Important 

Brady's Wiz is an important product 
because of the fine job it does in letting 
your OS-9 based Color Computer com- 
municate with the rest of the world. 
However, its real importance stems 
from the fact that it shows that BASIC09, 
running in the OS-9 Level II windowing 
environment, is a tremendously viable 
development tool. 

"Another significant thing about 
both Wiz and BigT is the way they are 
constructed and distributed," Brady 
said. "If you run the OS-9 ident utility 
on the BigTfWe, you will see it contains 



both BASIC09 I-Code modules and 6809 
object code modules. All modules in the 
file load at once, and BigTassumes they 
are all in memory and immediately links 
to them with OS-9 system calls." 

Brady's approach makes it easier for 
users because they need only load and 
run one program file. They do not have 
to worry about loading the program's 
modules by hand — or ensuring they are 
present in the current execution direc- 
tory where OS-9 can find them auto- 
matically. However, Brady's approach 
points out an important technical detail 
that bears explaining. 

"By loading all modules in the file at 
once, we ensure they are loaded contig- 
uously," Brady said. "Under Level II 
this approach becomes very important 
because of the memory management 
hardware used in the CoCo 3." 

When you load a program module 
into your CoCo 3 — or when OS-9 
switches a module into a 64K. work- 
space used by a process — it will move 
an entire 8K block of memory into the 
space. This will happen even if the 
module is only 20 bytes long. 

This means you need to package your 
program modules into files that are no 
longer than 8K bytes long. If they go 
one byte past the 8K, you might as well 
add more to the program because you 
can use up to I6K for the same cost. 

Let's use the Wiz file as an example. 
It contains five modules: WTerm, 15,435 
bytes; WizDraw, 1,365 bytes; WiXmod, 
4,833 bytes; SysCail, 98 bytes; and 
InKey, 94 bytes. The file contains 
21,825 bytes. When it is loaded into 
memory, it takes up three 8K blocks or 
24,576 bytes of memory. If Brady ex- 
pands the program, he has another 
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0S9 LEVEL II 

SOFTWARE and HARDWARE 

"Frank Hogg Laboratory has supported OS9 longer than ANY other company!!!" 



INSIDE OS9 
LEVEL II 

The definitive 'Inside' story behind OS9 for the CoCo III. 
Kevin Darling and Frank Hogg team up to provide the 'nuts 
and bolts' information needed to really use OS9 Level II. 
This book takes you chapter by chapter thru the inner 
workings of OS9 including the window drivers, fonts and 
patterns, bugs and how to fix them, GIME reference and it 
even shows you how to use Tandys Rogue game disk to 
make a workable OS9 Level II system, plus much more. 
Approximately 100+ pages. Source listings are provided for 
some things plus flow charts and tables. A Must buy for 
anyone interested in OS9 Level II. 

Just $39.95 

Coming next "Inside Multi-View" 



THEQTCoCo 

Question: The QT CoCo is the second most expensive 

hard drive/floppy drive subsystem for the CoCo? True or 

False? The QTCoCois 

the only system that 

can be upgraded to a full 

68000 based computer? 

(The QT Plus) True or 

False?The answer to 

both questions is True. 

If you want to have the 

best drive subsystem 

for your CoCo then The 

QT CoCo is for you. 

20 Meg HD + 360 or 

720K floppy $1350. 

Fast 40 Meg HD with 360K or 720K floppy is $1998. 

Requires a host adaptor. (Disto etc) 

Call or send for more information today! 




SCULPTOR 

Sculptor is a fourth generation language, an applications 
generator and a database all rolled into one. The 4th GL part 
of Sculptor means that programming time is cut by a factor 
of 5 or 10. The applications generator part of Sculptor writes 
programs for you and the database part is a very fast B+ 
tree. Sculptor is FAST! New users are up to speed in a few 
days, up to speed users can write sophisticated programs 
in half an hour! In our database of over 20,000 names we 
can retrieve any name in less than 1 second!! The program 
that does that only took 2 minutes to write! That's right 2 
(two) minutes! Maximum # of records is 22,000,000! No limit 
to # of fields etc. Includes a menu program, a query program 
and a variety of utilities to maintain the files. The typeset 
manual is the best available with both a table of contents 
and an index. A handy pocket guide is also included. Re- 
quires CoCo III and OS9 Level II. Call for more information. 

List $595 - Special Only $495! 
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The WIZ 

By Bill Brady 

The Wiz is the First and Only program designed for 
the CoCo III that uses WINDOWS! The Wiz is a smart ter- 
minal and communications program for the CoCo III and 
OS9 Level II. Making use of multiple windows and overlay 
windows with pop up dialog boxes The Wiz really shines. 
Features include: Autolog- lets you configure The Wiz's col- 
ors, characters boldface etc., Xmodem and text send and 
receive, sleep mode, conference mode uses a separate 
window for your text, usage log and much more. Does not 
work with the CoCo's internal bit banger serial port. The 
complete package includes a special ACIA driver that al- 
lows baud rates from 300 to 19,200 baud. Requires the 
RS232 pak or the Disto RS232 or similar port plus a CoCo II 
with OS9 Level II. 

Only $79.95 



Frank Hogg Laboratory, Inc. Est. 1976 - 770 James Street - Syracuse New York - 13203 
315/474-7856 Visa, M/C, Amex, Diners club accepted. Prices do not include shipping. 



2,751 bytes to work with before he must 
invest another 8K of memory in the 
process. 

Now, let's look at what would have 
happened if Brady had left all five of 



"Micro ware did a beautiful 
job on this thing. " 

these modules in separate modules and 
then loaded them. WTerm would have 
used two 8K blocks or 16,384 bytes, and 
WizDraw, WiXmod, SysCall and Inkey 
would have each taken 8K bytes, for a 
grand total of 49,152 bytes. Brady's 
method saved 24,576 bytes of program 
memory area. Keep in mind that even 
though you may have 5I2K of memory 
available to you with OS-9 Level II, 
each process — defined as a program 
running — can only use 64K of memory. 

A Closer Look at BigT 

BigT requires a CoCo 2 with an 80- 
column screen, a Multi-Pak, an RS-232 
pack, BASIC09 and OS-9 Version 2.0. 
Rather than use a capture buffer, BigT 
uses the XON/XOFF protocol to tell 



the host to stop sending, while it is 
sending data to your printer or a disk 
file. 

One of the modules that comes in the 
BigT('\\e is an optimized device driver, 
SIO. This driver optimizes your CoCo 
when it is being used as a terminal with 
any host. It is reliable with screen 
drivers that do not disable interrupts all 
the way to 19.2K baud. 

You can print the last 1,024 charac- 
ters received at any time by pressing 
ALT-P. Or you can redisplay those char- 
acters by pressing ALT-S. You can also 
download everything you receive to a 
disk file or upload text files to the host. 
An auto-log feature, similar to that used 
by the Tandy Model 100 laptop compu- 
ter, makes automatic operation possible 
for some tasks. 

Big nets you use the error-free Xmo- 
dem protocol to transfer binary files 
between two computers, and it gives 
you two 80-character macros you can 
recall with the two CoCo 3 function 
keys. Brady is hoping to come up with 
an OS-9 standard protocol similar to 
the MacBinary protocol that lets you 
automatically download executable 
program files from a host like Delphi. 



Wiz adds the ALT-W, ALT-C and ALT- 
P keys to the Big T repertoire. ALT-W is 
used to put Wiz to sleep. ALT-C puts you 
in the conference mode and ALT-P gives 
you a way to update the time-in status 
bar along the top of your screen. 

The Wiz config menu lets you set the 
color of the characters on your screen, 
as well as the background. It also lets 
you toggle between regular letters or 
boldface letters. A proportional spacing 
character set is also available from that 
menu. 

When you tell Wiz you want to go out 
to the OS-9 shell and do something else, 
it opens up a dialog window in the 
middle of your screen. When you return 
from the shell, your original screen is 
restored. Incidentally, the event win- 
dow at the bottom of the screen that is 
used for conferencing and messages is 
a device window, as is the main screen. 
The menus are output to overlay win- 
dows. 

The status bar at the top of the screen 
is a pseudo-window. To create it, Brady 
first created a window that filled the full 
size of the screen. Then, he wrote out 
the status bar and resized the main 
window so it is one line smaller and 



Two- Liner Contest Winner . . . 

Run this program if you would like a little help in 
setting the baud rate for your printer. 



The listing: 

10 CLS : PRINTTAB ( 6 ) " PRINTER 
RATE": PRINT: PRINT" 1 = 50 

= 1800"," 2 = 75", "10 = 
," 3 = 110", "11 = 24)3)3"," 
135", "12 = 3600"," 5 = 150 

= 4800"," 6 = 300", "14 = 
," 7 = 600", "15 = 9600"," 
200": PRINT 

20 INPUT"ENTER CHOICE (1-15 
IF Z<1 OR Z>15 THEN 10 ELSE 
40882227124 6115311100180008 
0025002 30018001000070003000 
KE 149,VAL(MID$(Z$,Z*4-3,1) 
E 150,VAL(MID$(Z$,Z*4-2,3) ) 
T"BAUD RATE NOW SET" 



BAUD 
"," 9 

2000" 
4 = 
","13 

7200" 

8 = 1 

) " ; Z : 
z$=" 

80040 
l":PO 
) :POK 
:PRIN 



Michael Kromeke 
Albuquerque. NM 

(For [his winning two-liner conlesl entry, the author has been sent copies of 
both Tlte Second Rainbow Book of Simulations and its companion The Second 
Rainbow Simulations Tape.) 



Two-Liner Contest Winner . . . 

This Two-Liner will print out PRINTS worksheets for 
you. 

The listing: 

1 INPUT"# OF WORKSHEET S";N:FORZ= 

1 TO N :PRINT#-2, TAB ( 19 ); "PRINT @ 
WORKSHEET (32 X 16) " : PRINT#-2 : P 

RINT#-2,TAB(23) ; :FORX=l TO 2:T=T 
+l:FORY=l TO 10 :PRINT#-2, USING" # 
#";T; :NEXTY,X:PRINT#-2," 3 3 ":P 
RINT#-2,CHR$(15) ; :FORX=l TO 3 : FO 
RY=0TO9:PRINT#-2,TAB(4) ; 

2 PRINT#-2,USING"##";Y;:NEXTY,X: 
PRINT#-2," 1 ":FORY=l TO 16: PR 
INT#-2, USING" ###";H; :PRINT#-2,"! 
"; :H=H+32:FORX=l TO 32:PRINT#-2, 
" ! " ; : NEXTX : PRINT # - 2 : NEXT Y : PRINT 
#-2,CHR$(14) :T=0:H=0:NEXTZ 



Bobby Greene 
Lenoir, NC 

(For this winning two-liner contest entry, the author has been sent copies of 
both The Second Rainbow Book of Simulations and its companion The Second 
Rainbow Simulations Tape.) 
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starts one line down. Since the status 
bar is outside of the main window, it 
remains on your screen. 

Another trick Brady learned while 
programming Wiz was how to draw a 
border around an overlay window. To 
make his bevelled borders, he created a 
bevelled border sized to work with a 
640-by-l92 pixel screen. He found that 
after he did this, he could open any size 
window and write the same code to it. 
The system then automatically scales 
the border to the window. In the words 
of Bill Brady, "Microware did a beau- 
tiful job on this thing!" 

WizDraw Listing 

Bill Brady is so excited about the new 
windowing environment, he is sharing 
the module that draws the Wiz start-up 
screen. This way you can see how easy 
high resolution graphics can become 
with BASIC09 under OS-9 Level II. 

There's an important time- and 
space-saving feature built into Brady's 
code. He makes full use of BASlC09's 
ability to create special data types. In 
WizDraw, he creates a data type that 
defines a box and a line, and another 
that allows him to move OS-9's high 
resolution graphics cursor anywhere on 
the screen. 

We'll use Brady's definition of the 
data type lx to show the advantages of 
this approach. The data type lx has six 
parts. Each part is one byte long. 

TYPE lx=olx,tlx,hbx.lbx, 

hby,lby:BYTE 

After using the BASIC09 TYPE state- 
ment to define his data, Brady uses the 
DIM statement to actually reserve the 
memory for his program to use: DIM 
line:lx. This line tells BASIC09 to 
reserve six bytes of memory — one for 



each of the six-byte fields in the new 
data type lx. Next, Brady assigns a 
value of decimal 27 to the field named 
olx and a value of $46 to the field 
named tlx. 

If you look on pages 4 through 9 of 
the windowing section of the OS-9 
Level II manual, you will find an OS- 
9 drawing command named LineM. 
LineM means, "Draw a line and move." 
It draws a line, using the current fore- 
ground color, from the current draw 
pointer position to a new point. To send 
that command to OS-9 so a line can be 
displayed on your screen, you could 
simply use the standard display utility 
command, 059: display lb 4G HBX 
LBX HBY LBY. 

Deja vu! Where have you seen the lb 
and 4G before? Didn't Brady assign 
those values to the olx and tlx fields 
of his new data structure? Read HBX as 
high byte of the X coordinate and LBX 
as low byte of the X coordinate. Read 
the values for the Y position in a similar 
manner. 

To use this command from the OS- 
9 shell, you need to know the integer — 
two bytes wide — value of the end of 
the line. For example, on a screen 640 
decimal pixels wide by 192 decimal 
pixels high, the middle of the screen 
would have an X coordinate of 320 and 
a Y coordinate of 96. That same posi- 
tion would be 140, 60 using hexadec-, 
imal notation. Remember the display 
utility command speaks Hex. 

To draw a line from the upper left- 
hand corner of the screen, position 
horizontal and vertical, you would 
type: 059: display lb 4G 01 40 00 60 
ENTER. 

Notice you sent six bytes to the 
standard output path when you ran this 
line. When you did, a line popped onto 
your Color Computer screen. You must 



be in a graphics screen before this 
command line will work. We'll show 
you a procedure file named MakeGW You 
can use this file to turn your current 
window into a graphics window later. 

You can also draw lines on your 
screen using the BASIC09 GFX2 LINE 
function. If you look at the definition 
of this function, you will see it accepts 
an optional path number, the word 
"LINE" and either two- or four-integer 
(or two-byte) parameters. 

If you use two parameters, the LINE 
function will draw the line from the 
current graphics cursor position to the 
new position. If you give it four parame- 
ters, LINE will draw the line between the 
optional beginning X and Y coordinates 
and the ending coordinates. Assuming 
the graphics cursor is located in the 
upper left-hand corner of the screen, 
position 0, again, you can draw the 
same line from within BASIC09: RUN 
GFX2("LINE", 320, 9G). Notice that 
this time we used decimal numbers as 
coordinates. That's what the LINE 
function wants to see. 

For now, let's continue to look at how 
Brady makes good use of BASlC()9's 
ability to GET and PUT complete data 
structures with a single command. After 
he assigns the values to the olx and tlx 
fields, he makes similar definitions in 
his rbox and putgc data structures. 
Rbox is used to draw a box with one 
swift command. Putgc moves the cur- 
sor with the same speed and agility. 

He is using assignment statements to 
place the proper control codes in the 
first two positions of his data structures 
and to pass coordinate information to 
his data structures. The codes he is using 
are the same codes you would send 
using the OS-9 display utility com- 
mand. The coordinates define the posi- 
tion of the corners of the box, the new 



OS-9 SOFTWARE/HARDWARE 



SDISK— Standard disk driver module allows the full use of 35, 40 
or 80 track double sided disk drives with COCO OS-9 plus you 
can read/write/format the OS-9 formats used by other OS-9 
systems. (Note: you can read 35 or 40 track disks on an 80 track 
drive). Now updated for OS-9 ver. 02.00.00 $29.95 

SDISK + BOOTFIX— As above plus boot directly from a double 
sided diskette $35.95 

L1 UTILITY PAK— Contains all programs from Filter Kits Nos. 1 
& 2 plus Hacker's Kit #, plus several additional programs, Over 
35 utilities including "wild card" file cmds, MacGen command 
language, disassembler, disk sector edit and others. Very useful, 
many of these you will find yourself using every time you run your 
system. These sold separately for over $85. $49.95 
SKIO— Hi res screen driver for 24 x 51 display; does key click, 
boldface, italics; supports upgraded keyboards and mouse. With 
graphics screen dump and other useful programs. Now UPDATED 
FOR OS-9 Ver 2.0 $29.95 



PC-XFER UTILITIES- Utilities to read/write and format ss MS- 
DOStm diskettes on CoCo under OS-9. $45.00 (requires SDISK) 

CCRD 512K Byte RAM DISK CARTRIDGE— Requires RS Multipak 
interface, two units may be used together for 1MB RAM disk. 
Addressing is switch selectable. OS-9 level 1 and 2 driver and test 
software included. $169.00 

All disk prices are for CoCo OS-9 format; for other formats, specify 
and add $2.00 each. Order prepaid or COD, VISA/MC accepted, add 
$1.50 S&H for software, $5.00 for CCRD; actual charges added for 
COD. 

D.P. Johnson, 7655 S.W. Cedarcrest St. 
Portland, OR 97223 (503) 244-8152 

(For besl service call between 9-11 AM Pacific Time) 

OS-9 la a Iradomafk ol Mtcroware and Motorola Inc. 
MS-DOS is a Iradomarft of Microsoft. Inc. 
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end of the line or the new position of 
the cursor. 

Once he has stored all this informa- 
tion in the data structure, Brady sends 
those data structures intact to the 
standard output path, which just 
happens to be your screen. For exam- 
ple: 

putgc. oxy=Slb 
putgc. txy=$40 
putgc. hxyx=0 
putgc. lxyx-200 
putgc. hxyy=0 
putgc. lxyy=12 
PUT 01, putgc 

These BASIC09 statements move the 
draw pointer to a position 200 pixels to 
the right of the left edge of the screen 
and 12 pixel positions down from the 
top of the screen. This is the first cursor 
movement in the program. The next 
magic command out ofthehat?PUTBl, 
rbox. 

This draws a "relative" box with one 
corner on the starting position above 
and the opposite corner located 20 
pixels to the right and 60 pixels down. 
From there, Brady moves the cursor just 
inside the box and sends out the com- 
mand to fill the box with the current 
foreground color. Then, he moves the 
cursor again before drawing a number 
of lines one after the other. Each line 
begins where the last one ended. In 
about a second, a giant Wiz logo is 
drawn on your screen. 

Instead of typing a series of shell 
display statements in his BASICG9 pro- 
gram, Brady has sent out his code with 
a simple PUT statement. He also saves 
8K of memory in the process because 
every time you create a new shell to run 
a process, you use up one 8K block of 
data memory, albeit temporarily. 

Creating a Graphics Window 

To create a graphics window in place 
of the text window, you must send out 
a sequence of OS-9 display commands. 
Essentially, these commands must end 
the window you are using, set the type 
of the new window you want to use and 
then select that new window for use. 

Create the following OS-9 procedure 
file with the build utility command or 
your editor, and then run it when you 
want to change in place from a text 
window to a graphics window. The 
characters appear to be a little sharper 
in the text windows — like the one 
created on device /w? by the procedure 
file window. t80s that comes on your 



Level II system disk — than they do in 
the graphics windows. Here is MakeGW. 



merge /d0/sys/stdfonts 


montype 


r 


display 


lb 24 


display 


lb 20 5 50 IB 


10 




display 


lb 31 1 


display 


lb 3a CB 01 


display 


lb 21 



This procedure file will create an 80- 
by-24 white screen with black letters. 
The display commands are actually 
calls to the following OS-9 functions: 



DWEnd 


Device Window End 


DWSet 


Device Window Set 


Palette 


Change Palette 


Font 


Select Font 


Select 


Window Select 



The Magic of /dd 

One great new feature in the OS-9 
Level II release is the device descriptor 
'dd. The "dd" stands for default drive. 
Microware and Tandy obviously intend 
for all software developers to use this 
device descriptor when they must hard 
code a pathlist into a program. 

When you boot your OS-9 Level II 
system, the device descriptor is merely 
a copy of the standard /d0 device 
descriptor that is also present. 

Who cares, you might ask. You will 
— soon! Follow this scenario that 
actually happened to me. Immediately 
after booting my new OS-9 Level II 
system, I created a new boot file. This 
file contained /d0 and /dl device 
descriptors set at 40 tracks, double- 
sided with a step rate of 6 ms. I left 
/dd in the boot file, not even noticing 
it was there. 

Later, 1 encountered a new error 
number while creating new windows. I 
immediately typed ERROR 192 and 
waited for the system to tell me what I 
had done wrong. No such luck! I got a 
message that said I couldn't open a path 
to /dd/sys/errmsg. 

I wondered for a second, then I got 
the picture. The disk that now con- 



tained my system and errmsgs was a 
double-sided disk. The default drive, 
/dd, was still set to look like the original 
/d0, a single-sided, 35-track affair. 
When the error utility command tried 
to read the errmsg file from the SYS 
directory on my double-sided disk, it 
couldn't access it. Foiled, but protected 
at the same time. 

After I got my Disto hard disk drivers 
installed in my Level II system, I made 
a copy of the /h0 device descriptor and 
patched it so the module it contained 
was named -"dd. I verified it to update 
the CRC and then used DS9Gen to 
generate a new 0S9Boot file with my 
new 'dd replacing the original. 

I had already copied the errmsgs 
into the SYS directory on the hard disk 
drive. The next time 1 hit an error 
message I typed the error utility com- 
mand again. This time, the hard disk 
started clicking and, a second later, the 
system reported the English language 
version of the sin I had committed. 

Now, as soon as all developers start 
using /dd/defs/defsf iles instead of 
/d0/defs/defsf iles, etc., we will 
have it made. By the way, if you have 
a RAM disk instead of a hard disk, you 
can create a default device descriptor, 
/dd, that points to your RAM disk. 
Then, if you put your SYS directory in 
your RAM disk, the error utility 
command will respond almost instan- 
taneously. So will the help utility 
command. 

In summary, the default device de- 
scriptor /dd is nothing more than a 
copy of the device descriptor for the 
drive where you would like to store 
things that must always be found. 

Here's another point. Using my cur- 
rent system as an example, /dd is 
nothing more than a copy of /h0. Both 
/dd and /h0 are still in the boot file, and 
both can be used to access that single 
piece of hardware. Since both device 
descriptors have the same drive number 
and the same address with only the 
name changed, there are no collisions. 

If we all come behind this Microware 
standard and create a few standard 
default directory names of our own, it 



Listing 1: 


wizdraw 


PROCEDURE 


wizdraw 


0000 


TYPE bx=obx , tbx , hbbx , lbbx , hbby , lbby : BYTE 


001F 


TYPE putxy=oxy , txy ,hxyx, lxyx,hxyy, lxyy: BYTE 


003E 


TYPE lX=olx , tlx , hbx , lbx , hby , lby : BYTE 


005D 


DIM ffil:STRING[2] 


0069 


DIM rbox:bx 


007 2 


DIM putgc :putxy 


007B 


DIM line:lx 



200 
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may someday be much easier to write 
programs that can be used easily — no 
matter where your current data direc- 
tory is located. It won't make any 
difference if we are using a 40-track, 
double-sided floppy disk, a RAM disk, 
an 80-track quad-density floppy or a 
hard disk drive — if our programs look 
in 'dd'sys-'errmsg for English lan- 
guage messages they will find them, if 
we have copied the sys'errmsg file to 
that medium. 

How To Use ModPatch 

The same day we received our OS-9 
Level II package we got a call from Cray 
Augsburg of Delphi rainbowmaG 
fame. Cray had received his package, 
too, and wanted to know how to patch 
his device descriptors to pick up a six 
millisecond step rate. He had already 
used conf ig to make a new 0S9Boot 
file that let him use his double-sided 
drives. 

For some reason, I couldn't find the 
ModPatch directions in the thick man- 
ual that comes with Level II, so I typed 
help modpatch and picked up enough 
of the syntax to do the job. 

ModPatch reads a file containing the 
patches you want to make, to a module 
in memory. The patch file I sent to Cray 
on Delphi looked like this: 



L d0 


C 14 00 03 


V 


L dl 


C 14 00 03 


V 



That file will take care of both 'd0 
and -'dl. It links to the device descriptor 
in the first line. In the second line, it 
changes the byte at an offset 14 Hex 
bytes from the beginning of the file from 
00 to 03. This changes the step rate from 
30 milliseconds to six milliseconds. The 
official name of that byte in a device 
descriptor is IT.STP. 

To actually make the patch after he 
downloaded the listing into a file named 
patch, Cray typed: ModPatch patch 
ENTER. 

And while we're speaking of patches, 
if you have any device descriptors you 
are upgrading to Level II, you need to 
change the byte at an offset of 14 
decimal from FF to 07. To do it, create 
a ModPatch patch file like this: 

L H0 

C 0E FF 07 

V 

That's all there is to it! 



0084 


putgc . oxy= 27 \putgc.txy=$40 




009B 


line.olx=27 \line. tlx=$46 




00B2 


ffil=CHR$(27)+CHR$(S4F) 




00BF 


rbox.obx=27 




00 CA 


rbox.tbx=$4 9 




00D6 


rbox . hbbx=0 




00E1 


rbox. lbbx=20 




00EC 


rbox . hbby=0 




00F7 


rbox . lbby=60 




0102 


PRINT CHR$($0C) ; 




0109 


putgc. hxyx=0 \putgc . lxyx=200 \putgc . hxyy=0 \putgc 


Ixyy=l2 


0135 


PUT #1, putgc 




013E 


PUT Si, rbox 




0147 


putgc.lxyx=202 \putgc. lxyy=13 




015D 


PUT #1, putgc 




0156 


PUT Sl.ffil 




016F 


putgc. lxyx=2 20 




017A 


putgc. lxyy=72 




0185 


PUT SI, putgc 




018E 


line.hbx=l \line.hby=0 




01A4 


line.lbx=$18 \line. lby=72 




01BB 


PUT SI, line 




01C4 


line.hbx=l 




01CF 


line.lbx=$2C \line.lby=62 




01E6 


PUT SI, line 




01EF 


line.lby=12 




01FA 


PUT SI, line 




0203 


line.lbx=2 6 




020E 


PUT SI, line 




0217 


line.lby=68 




0222 


PUT SI, line 




022B 


line.lby=70 \line. lbx=$18 




0242 


PUT SI, line 




024B 


line. lbx=6 




0256 


PUT SI, line 




025F 


line. lby=12 




02 6A 


PUT SI, line 




0273 


line.hbx=0 \line. lbx=$Fl 




028A 


PUT SI, line 




0293 


line.lby=70 




029E 


PUT Si, line 




02A7 


line.lbx=220 




0232 


PUT SI, line 




023B 


putgc. lxyx=2 22 




02C6 


putgc. lxyy=71 




02D1 


PUT SI, putgc 




02 DA 


PUT Sl,ffil 




02E3 


putgc. hxyx=l \putgc. lxyx=$20 




02FA 


putgc. lxyy=14 




0305 


PUT SI, putgc 




030E 


PUT Sl,ffil 




0317 


putgc. hxyx=l \putgc. lxyx=$40 \putgc. lxyy=12 




0339 


rbox . lbbx=20 \rbox . lbby=5 




034F 


PUT SI, putgc 




0358 


PUT SI, rbox 




0361 


putgc. lxyx=S 41 \putgc . lxyy=13 




0378 


PUT SI, putgc 




0381 


PUT Sl,ffil 




038A 


putgc. lxyy=24 




0395 


putgc . lxyx=$40 




03A1 


PUT SI, putgc 




03AA 


rbox. lbby=48 




03B5 


PUT Si, rbox 
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putgc.lxyy=25 \putgc. lxyx=$41 

PUT #l,putgc 

PUT #l,ffil 

putgc.lxyx=$68 \putgc.lxyy=24 

PUT #l,putgc 

line.hbx=l \line. lbx=$B8 

line.hby=0 

line.lby=24 

PUT n,line 

line.lby=34 

PUT Si, line 

line. lby=70 

line. lbx=?70 

PUT #l,line 

line.lbx=$B8 

PUT #l,line 

line.lby=72 

PUT #l,line 

line.lbx=$68 

PUT #l,line 

line.lby=62 

PUT #l,line 

line.lby=26 \line. lbx=$B0 

PUT U,line 

line. lbx=$68 

PUT #l,line 

line. lby=24 

PUT #l,line 

putgc.lxyx=$90 \putgc. lxyy=48 

PUT »l,putgc 

PUT #l,ffil 

END 



03BE 
03 D5 
03DE 
03E7 
J33FE 
0407 
041E 
0429 
0434 
043D 
0448 
0451 
045C 
0468 
0471 
047D 
0486 
0491 
049A 
04A6 
04AF 
04BA 
04C3 
04DA 
04E3 
04EF 
04F8 
0503 
050C 
0523 
052C 
0535 

Listing 2: xmode 
/* 

* modified xmode utility to allow changing IT. Col and IT. Rev 

* in the device descriptor. 
* 

* Copyrioht (c) 1986 by Gregory A. Law 
V 

•include <ctype.h> 
J include <module.h> 

•define DIGHEX(x) 
•define TRUE 

/* 

* pointer to the options section of the device descriptor 

V 

struct { 

char dvc, upc, bso, dlo, eko, alf, nul, pau, pag, 

bsp, del, eor, eof, rpr, dup, psc, abort, quit, 
bse, ovf, par, bau; 
unsigned d2p; 

char xon, xoff, col, row; 

) "Opts; 

main(argc, argv) 



:(x) <= 



(x) 



toupper(x) -' A 1 + J3x#a) 



int 


argc ; 




char 


*argv[]; 




i 


char 


•Module; 




unsigned 


Address; 




unsigned 


* Length; 




unsigned 


•PortAddr; 




char 


•ModCrc ; 




char 


•NamePtr; 




int 


Modified = 




int 


i; 



/* pointer to the descriptor */ 
/• address of the descriptor •/ 
/* size of the descriptor */ 
/• pointer to the port address */ 
/* pointer to the CRC bytes */ 
/* pointer to the module name */ 
/* modified flag «/ 



NamePtr - argv(l); 
if (NamePtr [0] =■= '/') 
NamePtr [£] » ' ' ; 

Module = modi ink (NamePtr, J5, 0) ; 
if (Module =- -1) 
exit (221) ; 

PortAddr = Module + 0xj8f; 
Opts » Module + 0x12; 

iffargc > 2) ( 

Modified =• 1; 
for (i ■> 2; i < argc; i++) 
parse (argv[i] ) ; 

) 

if (! Modified) ( 

printf("Port address=%p4X\n", *PortAddr) ; 



/* point to the module name */ 

/* if the name contains a slash */ 

/* simply strip it out */ 

/* link the descriptor */ 
/* if there is an error */ 
/* exit with an error */ 

/« point to the port address */ 
/* set the structure pointer */ 

/* if there are command line options */ 
/* set the modified flag */ 
/•do for each command line word •/ 
/• run through the parsing routine •/ 



New Level II Utility Programs From 
Kevin Darling 

Kevin Darling has uploaded a set of 
OS-9 Level II utility programs to both 
the rainbow Delphi OS-9 Online SIG 
and the CompuServe OS-9 SIG. They 
take CoCo OS-9 Level II memory 
management techniques into consider- 
ation and are stored in one file just 
under 8K bytes long. The package 
includes proc, a procs-like utility that 
also reports the standard input and 
output devices for each process; dirm, 
an rndir replacement that prints true 
block numbers and a tick mark on the 
left side of the first module name loaded 
from a file; mmap, which prints a mem- 
ory block map that shows where mod- 
ules are loaded, data is being stored or 
is free; smap, which shows the layout of 
memory in the system page; pmap, 
which shows process DAT image maps 
and tells which process is using each 
block; and dmem, which can be used to 
write up to 1,024 bytes of data from a 
specified memory block to the standard 
output path. These utilities make a nice 
addition to your OS-9 toolkit. 

DeskMate Tip From Color Expo 

We interviewed two of the Color 
Computer Community's movers and 
shakers, Dale Lear and Paul Searby, at 
Color Expo '87. We talked to Dale 
about a new way to use the VShell 
program built into his TSWorcl pack- 
age. Look for it in the next column. 
We'll also feature Lear in a short per- 
sonality profile. 

Paul Searby was so busy demonstrat- 
ing Computerware's new Screen Star 
program at Anaheim, we barely caught 
him for the interview. The new 
WordStar-like program works with 
either Level I or Level II OS-9. The 
Level II version takes advantage of the 
CoCo 3's ALT and function keys. It uses 
the Level II dialog windows to create 
pop-up menus and features a "smart 
speller" that uses a dictionary contain- 
ing the most common misspellings in 
the English language. 

Searby has been a staunch supporter 
of OS-9 for more than five years. Next 
month, we'll feature a few of his views 
about OS-9 Level II and the future of 
the CoCo 3. 

After our OS-9 presentation at Color 
Expo '87, we got into a long conversa- 
tion with John Alan Lind, K.D7XG, the 
Orange Section Technical Coordinator 
of the American Radio Relay League. 
Lind had solved a DeskMate printing 
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problem that has plagued many users. 
He shared his solution with us. 

One of the main problems with Desk- 
Mate is that it only supports two baud 
rates, 600 and 1 200. The baud rate is set 
by using the ALT-* keystroke pair and by 
selecting the printer icon that appears at 
the top of the screen. At the end of this 
process, you are asked to select between 
600 and 1200 baud. 

Resetting the default baud rate for the 
printer device descriptor, /p, using 
xmode and cobbler will not work. 
DeskMate "conveniently" resets the 
baud value right back to 600 with its 
own embedded version of xmode. The 
tuneport utility gave Lind a tool to 
solve the problem. 

It works at a lower level in the de- 
scriptor than xmode and resets the 
actual timing loop value for the baud 
rate selected. It allows gross as well as 
fine tuning, and Lind decided to set the 
1200 baud timing loop so it would 
actually print at 2400 baud. He figured, 
accurately, that if he could do this, he 
would be able to make the 1200 baud 
selection to print at 2400 baud. 

First, load xmode, tuneport and 
cobbler into memory from your OS- 
9 system disk. Then, replace your sys- 
tem disk with the DeskMate disk and 
run the sequence below. Remember, the 
DeskMate disk is the one you want 
mounted at this time, because it is the 
one you are changing. 

You must make sure your printer is 
connected. If it isn't, tuneport won't 
work. If you forget, you'll see an "Error 
#246" message. Also, make sure your 
printer is set to the baud rate you want 
to use. Now type: 

059: chx d0/cmds 
0S9: xmode 'p baud=03 

This sets 'p to the 1 200 baud rate. If you 
want to retune the 600 baud selection, 
you must use xmode /p baud=02. 

Now type: 059: tuneport /p -s=45. 
tuneport will have you verify that you 
have indeed used the correct timing 
loop value. If the test message is printed 
OK, just press the ENTER key. If not, fine 
tune the delay by entering a new value 
close to 45. 

After you have run tuneport, use 
cobbler to rewrite the 059Boot file on 
your DeskMate disk: 0S9: cobbler / 
d0 ENTER. 

That's it! The next time you select 
1200 baud in DeskMate, the program 
will use xmode baud=03. Since you have 
set the timing loop at baud=03 to 2400 



printf ("%s 
printf ("%s 

printf ("%s 
printf ("%s 
printf ("%s 



Opts->upc = 
Oots->bso == 



"-upc" 
"-bsb" 



"upc") ; 
"bsb") ; 



? "-bsl" : "bsl") ; 
? "-echo" : "echo") 
? "-If" : "If") ,- 



Opts->dlo == 

Opts->eko =» 

Opts->alf == , 
printf ("nulls=%X ", (unsigned) Opts->nul) ; 
printf ("%s ", Opts->pau =- fi ? "-pause" : "pause"); 
printf ("pag=%d ", (unsigned) Opts->pag) ; 
printf ("bsb=%fS2X\n", (unsigned) Opts->bsp) ; 

printf ("del=%p2X ", (unsigned) Opts->del) ; 
printf ("eor=%J92X ", (unsigned) Opts->eor) ; 
printf ("eof=%02X ", (unsigned) Opts->eof ) ; 
printf ("reprint=%02X ", (unsigned) opts->rpr) ; 
printf ("dup=*02X ", (unsigned) Opts->dup) ;" 
printf ("psc=%02X ", (unsigned) Opts->psc) ; 
printf ("abort=%02X\n", (unsigned) Opts->abort) ; 



printf ("quite=%02X 
printf ("bse=%02X " 
printf ("bell=%02X 
printf ( " type=%02X 
printf ("baud=%02X 
printf ("xon=%02X 



', (unsigned) Opts->quit) ; 

(unsigned) Opts->bse) ; 
, (unsigned) Opts->ovf ) ; 
, (unsigned) Opts->par £ fixft) 
, (unsigned) Opts->bau) ; 

(unsigned) Opts->xon) 



printf ("xoff=%(32X\n" , (unsigned) Opts->xof f) ; 

printf ("col-%d ", (unsigned) Opts->col) ; 
printf ("row=%d\n", (unsigned) Opts->row) ; 



/* 
* this routine updates the CRC of the descriptor 

V 

if (Modified) ( 

Address - Module; 

Length «■ Address * 2 ; 

ModCrc = Module + ('Length) - 3; 

ModCrc [0] = ModCrc [1] - ModCrc[2] - fi-xtt; 

crc(Module, 'Length - 3, ModCrc); 

ModCrc[p) = ~ModCrc[0]; 

ModCrcfl] - -ModCrc[l]i 

ModCrc[2] - -ModCrc[2); 



muni inlc (Module) 



/* finally, restore the link count */ 



/* 

* This is a quick and dirty parsing routine using strcmp() to 

* compare the input string with a know flag. It could have been 

* smaller but at the time I was too lazy to write the real 

* parsing routine and parsing tables. After all, are not macros 

* easier to type? 

V 
parse (command) 
char command [ ] ; 

( 

int i; 
char value; 

for (i = 0; i <= strlen (command) ; i++) 
command [i] = tolower(command[i]) ; 

if (! strcmp (command, "upc")) 
Opts->upc • 1 ; 

if (! strcmp (command, "-upc")) 
Opts->upc = 0; 

if (! strcmp (command, "bsb")) 
Opts->bso •= 1; 

if (! strcmp (command, "-bsb")) 
Opts->bso = fi; 

if (I strcmp (command, "bsl")) 
Opts->dlo » 1; 

if (! strcmp (command, "-bsl")) 
Opts->dlo ■ fi; 

if (! strcmp (command, "echo")) 
Opts->eko = 1; 



if (! strcmpfcommand, 
Opts->eko = fi ; 



-echo" 



if (! strcmpfcommand, "If")) 
Opts->alf - 1; 

if (J strcmpfcommand, "-If")) 
Opts->alf = fit 

if (! strcmpfcommand, "pause")) 
Opts->pau = 1; 

if (! strcmpfcommand, "-pause")) 
Opts->pau = fi; 



May 1987 THE RAINBOW 203 



if (! strncmp(command, "null=", 5)) 

Opts->nul ° tohex(command) & pxff; 

if (! strncmp (command, "pag»", 4)) 

Opts->pag = toint(command) t pxif; 

if (! strncmp (command, "bsp=", 4)) 

Opts->bsp = tohex(command) S JJxff; 

if (! strncmp (command, "del=", 4)) 

Opts->del = tohex (command) 5 pxff; 

if (! strncmp(command, "eor=", 4)) 

Opts->eor = tohex (command) & pxff; 

if (! strncmp(command, "eof=", 4)) 

Opts->eof = tohex(command) S pxff; 

if (! strncmp (command, "reprint=", 8)) 
Opts->rpr = tohex (command) & 0xff; 

if (! strncmp(command, "dup=", 4)) 

Opts->dup = tohex (command) & pxff; 

if (! strncmp (command, "psc«=>", 4)) 

Opts->psc = tohex (command) S £xff; 

if (! strncmp (command, "aborts", 6)) 

Opts->abort - tohex (command) 4 pxff; 

if (! strncmp (command, "quit=", 5)) 

Opts->quit =« tohex (command) & 0xff; 

if (! strncmp (command, "bse»", 4)) 

Opts->bse ■ tohex (command) S pxff; 

if (! strncmp (command, "bell=", 5)) 

Opts->ovf = tohex(command) s flxff; 

if (! strncmp ( command , "type=", E) ) 

Opts->par = tohex (command) 6 jixff; 

if (! strncmp (command, "baud=", 5)) 

Opts->bau = tohex (command) & pxff; 

if (! strncmp (command, "xon=", 4)) 

Opts->xon = tohex (command) & flxff; 

if (! strncmp (command, "xoff=", 5)) 

Opts->xoff = tohex (command) S 0xff; 

if (! strncmp (command, "col»", 4)) 

Opts->col = tointf command) & pxff! 

if (! strncmp (command, "row=", 4)) 

Opts->row = toint (command) & pxff; 

) 

/* 

* This routine converts an ASCII hex value into a hex int value 

* using DIGKEX found in the above ((define. Note, if the value 

* is preceeded by a '%' (ie, eof=txx) then it will convert 

* a binary value to hex int. 
*/ 

tohex (line) 
char line[] ; 

( 

char *ptr; 
int value; 



ptr = line: 

while (*ptr != '=') 

ptr++ ; 
ptr++; 

if<ptrt)3] == •*■) 

return(tobin(ptr) ] 



/* search for the •=' until found */ 
/* trying the next char until done */ 
/* now point to one beyond the '=' */ 

/* is it a bin specifier «/ 
/* yes, do binary instead «/ 



while (*ptn ( 



/* process each digit there */ 
value = (value « 4) + DIGHEX(*ptr) ; /* shift left nibbles */ 
ptr-t-*-; /* point to the next character */ 



return (value) ; 



/* return the value calculated «/ 



/4 
« This routine converts an ASCII decimal value to hex int via 

» atoi() as found in the C Library. Note that "pag", "col" 

» and "row" MUST be set using only integer values. 

V 

toint (line) 
char line(] I 
( 

char *ptr; 

ptr ■ line; 



baud, Deskmaie will print at 2400 baud. 
Makes sense. 

"It took me a week to figure out how 
to fool DeskMaie with this patch," Lind 
said. "I was really frustrated that the 
authors didn't allow me to select a 
higher baud rate but was happy to be 
able to work it out." 

If you're an amateur radio operator, 
here's more good news. Lind is busy 
porting the WA7MBL packet BBS 
system into OS-9 C for the CoCo. 

D.P. Johnson's 512K Memory Upgrade 

Dan Johnson, of SDisk driver fame, 
was wearing bells at his Color Expo '87 
booth with Hemphill Electronics, Inc. 
He sold several dozen Plus- 1 00 512K 
memory upgrades to CoCo 3 owners. 
The board uses prime, factory-fresh 
120-nanosecond chips and gold plated 
connectors. It is the first CoCo upgrade 
board I have seen that uses the new 
zigzag package chips. The new chips 
give you the smallest overall board size, 
the shortest data paths and superior 
decoupling. 

Johnson and his partner were also 
demonstrating their new Vanguard PD 1 
OS-9 Level 1 microcomputer. The PDl 
uses a 6809E running at 2 megahertz 
and sports three serial ports, a modem 
port, a Centronics printer port and a 
real-time clock with a front panel LED 
display. A 450K. RAM disk is standard. 
It uses two dual-speed drives that can 
read single- or double-sided, 35-, 40- or 
80-track single-, double- or high-density 
disks in either standard OS-9, Radio 
Shack, Mizar or Fujitsu formats. It can 
also read and write IBM PC disks. The 
high density mode gives you a total 
storage of more than two million bytes 
and a data transfer rate of 500 kilobits 
per second. The whole thing is about the 
size of a lunch box. 

Color America Notes 

One of the fine people we met at 
Color Expo '87 was Jack W. Eizenga, 
the software exchange librarian for 
Color America. The club now has 
several public domain disks in its li- 
brary. Included in the selection are 
several RS-232 pack drivers, a terminal 
program, Steve Bjork's bouncing ball 
demo programs, several files containing 
OS-9 patch information, a set of OS-9 
tutorials Jack wrote and a Bulletin 
Board System written in BASIC09. If you 
have programs you would like to con- 
tribute to their efforts in Southern 
California or would like to join Color 
America, write to Eizenga at 3811 



204 



THE RAINBOW May 1987 



North Foster Ave., Baldwin Park, CA 
91706. We put him in touch with Carl 
Kreider, the new OS-9 Users Group 
software librarian. 

Sanford Sends Bouquet for Owlwarc 

In today's negative world, it does my 
heart good to see a positive note occa- 
sionally. One such note came in a letter 
from James A. Sanford of Hampton, 
Virginia. 

"A large bouquet to Owl Services," 
Sanford writes. "Tom called me back 
several times and spent quite a bit of 
time on the phone answering detailed 
questions about their system. When I 
got it, it had been 100 percent tested and 
worked fine." 

While on both CompuServe and 
Delphi, I noticed that the L R Tech hard 
disk system from Owl Services was one 
of the first ones up and running on OS- 
9 Level II. Good going guys! 

This Month's Listings 

Wizdraw from Bill Brady forms the 
heart of our tutorial this month. 

From Greg Law, is an English lan- 
guage xmode, which is a little more 
flexible than the standard version. It 
gives you the port address and an 
understandable listing of the defaults 
for the descriptor in question. 

Dennis Duke of Bessemer, Alabama, 
is back with this utility that takes input 
from the standard input path and sends 
out 16 hexadecimal characters per line 
on the standard output path. It prints 
the Hex representation above the 
ASCII representation of each byte. 

Finally, a Reader's Challenge 

Robert Parsons of Blackfoot, Idaho, 
had an idea. 

"Quite a few years ago, another 
magazine came out with an article that 
showed how to build an organ. Then, 
for months they featured articles with 
enhancements that added to the organ," 
Parsons said. "By initiating the same 
thing to programming for the CoCo 3 
under OS-9 Level II, we could come up 
with a program like CoCo Max 3 for 
OS-9. 

"The program could be written a 
module at a time by RAINBOW readers 
and the RAINBOW staff and submitted 
through 'KISSable OS-9'," Parsons 
continued. "I believe that writing mod- 
ules for main programs in this manner 
would boost the interest in using OS-9." 

Let me know what you think. Who 
will write the first module? Time will 
tell. See you in June. □ 



while(! isdigit(*ptr) 

ptr++ ; 
return (atoi(ptr) ) ; 



/* search through the line finding the decimal »/ 

/* value "hat should follow '*' */ 

/* now tell C to convert it and return value •/ 



) 

/* 

* This routine converts an ASCII binary value into a hex int. 

V 

tobin(line) 
char line[ ] ; 

( 

int i; 

int j(8); 

int value = p; 

for (i = f; i <= 7; i++) ( 

j[i] - ((line[i+l) == '1') ? 1 

value = (value « 1) + j[i]; 
) 

return (value) ; 
) 

Listing 3: hexdump 

char modid[] = "@ (#) hexdump. c 1 



/* repeat for 8 values */ 
/* convert ASCII to dec */ 
/* shift value left + j */ 



/* 
* 



* 

* 

V 



OS-9 utility 

by Dennis J. Duke 
Bessemer, Al. 
31 October 86 

Read a file and dump it in hex 



hexdump 



i include 
7 include 



<stdio.h> 
<ctype.h> 



int c, i, j = p; 

char holditl[16] [2] , holdit2 [16] [2] ; 

char holdl[2], hold2[2]; 



main() 



while ((c = getchar(J) !=EOF) { 

/* Convert the input integer to an ascii char. */ 
holdl[0] = toascii(c); 

/* Eliminate non-printable chars by replacing them with a ' . ' */ 
if (c < 32 || c > 126) 

c = 46; 
/* Convert this integer to an ascii char. */ 
hold2[£] = toascii(c) ; 

/* Copy these chars, to a holding area */ 
if(j < 16) 

copyit ( ) ; 
else ( 

/* Print the output */ 
printit() ; 
printf ("\n\n") ; 
/* Start the next string */ 
j = *>; 
copyit () ; 
} 
) 

/* Finish up whatever is left over */ 
printit() ; 
putchar('\n') ; 



copyit () 



strcpy(holditl[j] 
strcpy(holdit2[j] 
j ++; 



holdl) 
hold2) 



printit() 



I 



/* Print the chars, in hex */ 
for(i = p; i < j ; i++) 

printf ("%02x ", holditl[i] [0]] 
putchar ( '\n' ) ; 

/* Print the chars, in ascii */ 
for(i = p ; i < j ; i++) 

printf (" %s ", holdit2[i]) ; 



/» 
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THESE FINE STORES 
CARRY THE RAINBOW 

The retail stores listed below carry the rainbow on a regular basis and may have 




other products of 


nterest to Tandy Color Computer 


users. We 


suggest you 




patronize those in your area. 








ALABAMA 






Book Market 


MARYLAND 




Birmingham 


Jetterson Mews Co. 




East Cedar 


Silver Spring 


Layhlll Newsstand 


Brewton 


McDowell Electronics 




North Cicero 


MASSACHUSETTS 




Florence 
Greenville 
Madison 
Montgomery 


Anderson News Co. 
MSB Electronics 
Madison Books 
Trade N' Books 




West Dlversey 
E.B. Garcia & Associates 
Kroch's & Brentano's 
South Wabash 
West Jackson 
516 N. Michigan 
835 N. Michigan 
Parkway Drugs 


Brockton 
Cambridge 
Fitchburg 
Ipswich 


Voyager Bookstore 
Out Of Town News 
Corners Book Shop 
Ipswich News 


ALASKA 

Fairoanks 

ARIZONA 


Electronic World 




Littleton 

Lynn 

Swansea 


Computer Plus 
North Shore News Co 
Newsbreak. Inc. 


Phoenix 


TRI-TEK Computers 




Parkwest Books 


MICHIGAN 




Sierra Vista 


Livingston's Books 




Sandmeyer's Bookstore 


Allen Park 


Book Nook. Inc. 


Tempe 


Books Etc 




Univ. of Chicago Bookstore 


Dearborn 


DSL Computer Products 




Computer Library 




Univ. of Illinois Bookstore 


Durand 


Robbins Electronics 


Tucson 


Anderson News Co. 




Videomat. Inc 


Harrison 


Harrison Radio Shack 






Chilllcothe 


Book Emporium 


Howell 


Howell Auto Parts 


ARKANSAS 




Danville 


Book Market 


Lowell 


Curl's Sound & Home Arcade Center 


FayetleviHe 


Vaughn Electronics/Radio Shack 


Decatur 


Book Emporium 


Ml. Clemens 


Michigan Radio 


Ft. Smilh 


Hot Ott the Press Newsstand 




K-Mart Plaza 


Muskegon 


The Eight Bit Corner 


LiMIe Rock 


Anderson News Co. 




Northgate Mall 


Owosso 


C/C Computer Systems 


CALIFORNIA 




East Mollne 


Book Emporium 


Perry 


Perry Computers 


Citrus Heights 


Software Plus 


Evanston 


Chicago-Main News 


Royal Oak 


Software City 


Gross Valley 


Advance Radio. Inc. 


Geneseo 


B & J Supply 


Sterling 




Half Moon Bay Strawflower Electronics 


Kewanee 


Book Emporium 


Heights 


Sterling Book Center 


Hollywood 


Levity Dist'ibutors 


Lisle 


Book Nook 


Trenton 


Trenton Book Store 




Polygon Co. 


Newton 


Bill's TV Radio Shack 


Wyoming 


Gerry's Book Co. 


Sacramento 
Santa Rosa 


Tower Magazine 
Sawyer's News. Inc. 


Oak Brook 
Oak Park 


Kroch's & Brentano's 
Kroch's & Brentano's 


MINNESOTA 

Dululh 


Carlson Books 


Sunnyvale 
COLORADO 


Computer Literacy 


Paris 
Peoria 


Book Emporium 
Book Emporium 
Sheridan Village 


Minneapolis 
Wlllmar 


Read-More News 
The Photo Shop 


Westminster 


Software City 




Westlake Shopping Center 


MISSISSIPPI 




DELAWARE 






Book Market 


Jackson 


North Side News 


Middlerown 

Milford 

Wilmington 


Delmar Co 

Mllford News Stand 

Normar, Inc.— The Smoke Shop 


Schaumberg 

Skokle 

Springfield 


Illinois News Service 
Kroch's & Brentano's 
Kroch's & Brentano's 
Book Emporium 


MISSOURI 

Farmington 
Jefferson City 


Ray's TV & Radio Shack 
Cowley Distributing 


FLORIDA 






Sangamon Center North 


Kirksville 


TSR Electronics 


8oca Raton 


Software. Software. Inc. 




Town & Country Shopping Ctr. 


Moberiy 


Audio Hut 


Cocoa 


The Oper Doer 


Sunnyland 


Book Emporium 


St. Louis 


Book Emporium 


Davie 


Software Plus More 


West Frankfort 


Paper Place 




Computer Xchange 


Deitona 


Wilson Assoc, dbo Radio Shack 


Wheeling 


North Shore Distributors 




Front Page News 


Ft. Lauderdale 


Electronics Engineers 


INDIANA 
Angola 




MONTANA 




Jacksonville 


Mike's Electronics Distributor 
TheFJook Nook 
Book Town 
Deano's IV 


D & D Electronics 
Radio Shack 


Butte 

Whitefish 


Plaza Book Store 

Consumer Electronics of Whltetlsh 




Berne 


White Cottage Electronics 


NEBRASKA 




North Miami 




Columbus 


Micro Computer Systems. Inc. 


Lincoln 


Hobby Town 


[-.,:, ]£h 


Almor Bookstore 


Garrett 


Rnn News Agency. Inc. 


Omaha 


Nelson News 


Orlando 


Book Mania 


Greenwood 


The Computer Experience 






Panama City 
Pensacola 


Boyd-Ebert Cap. 
Anderson News Co. 


Indianapolis 


Bookland. Inc. 
Delmar News 


NEVADA 
Las Vegas 


Hurley Electronics 


Pinellas Park 


Wolf's Newsstand 




Indiana News 


NEW HAMPSHIRE 




Sarasota 


Family Computers 


Jasper 


Elex Mart 


West Lebanon 


Verham News Corp. 


Starke 
Tallahassee 


Record Junction. Inc. 
Radio Shack Dealer 
Anderson News Co. 


Madison 

Martinsville 

Wabash 


Arco Office Supplies 
Radio Shack 
Mining's Electronics 


NEW JERSEY 

Cedar Knolls 
Clinton 


Village Computer & Software 
Micro World II 


Tampa 
Titusville 


Fine Print Bookstore 
Computrac 


IOWA 

Davenport 


Intersla'e Book Store 


Marmora 
Pennsville 


Outpost Radio Shack 
Dave's Elect. Radio Shack 


GEORGIA 




Ottumwa 


Southslde Drug 


River Edge 


Software City 


Athens 


The Academic Resource Center. Inc. KANSAS 




Rockaway 


Software Station 


Bremen 


Bremen Electronics/Radio Shack 


Topeka 


Palmer News. Inc. 






Jesup 


Radio Shack 




Town Crier of Topeka, Inc. 


NEW MEXICO 




Marietta 


Act One Video 


Wichita 


Amateur Radio Equipment Co. 


Alamogordo 


New Horizons Computer Systems 


Toccoa 


Martin Music Radio Shack 


KENTUCKY 


Lloyd's Radio 


Albuquerque 


Desert Moon Distributors 
Page One Newsstand 






Georgetown 


Goodwin Electronics 


NEW YORK 




IDAHO 




Hazard 


Daniel Boone Gulf Mart 


Brockport 


Uft Bridge Book Shop. Inc. 


Lewiston 
Moscow 


Books. Etc. 

Johnson News Agency 


Hopklnsville 
Louisville 


Hobby Shop 

The Computer Store 


Brooklyn 
Elmira Heights 


Cromland. Inc. 

Southern Tier News Co.. Inc. 


ILLINOIS 




Paducah 


Radio Shack 


Fredonia 


On Line: Computer Access Center 


Aurora 


Kroch's & Btentano's 


Plkeville 


Ray's Furniture/Radio Shack Dealer 


Hudson Falls 


G A West & Co 


Belleville 


Software or Systems 


LOUISIANA 
Crowley 
Monroe 




Johnson City 


Unicom Electronics 


Champaign 
Chicago 


Book Morket 
B. Dalton Booksellers 
N. Wabash St. 


Acadiana Newsstand 
The Book Rack 


New York 


Barnes & Noble— Sales Annex 
Coliseum Books 
Eastern Newsstand 




West Jackson St. 


MAINE 






Grand Central Station, Track 37 




Bob's in Newtown 


Brockton 


Voyager Bookstore 




200 Park Ave. (Pan Am #1) 




Bob's News Emporium 


Caribou 


Radio Shack 




55 Water Street 




Bob's Rogers Park 


Waterboro 


Radio Shack 




World Trade Center #2 
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First Stop News 


Knoxville 


Anderson News Co. 


BRITISH COLUMBIA 






Idle Hours Bookstore 




First Byte Computer Co. 


Bumaby 


Compulit 






International Smoke Shop 


Memphis 


Computer Center 


Burns Lake 


VI. Viaeo Works 






Jonll Smoke 




Software. Inc. 


Campbell 








PennBook 


Nashville 


Mosko's Book Store 


River 


TRS Electronics 






Software City 


Smyrna 


Delker Electronics 


Chilliwack 


Charles Parker 






State News 


Union City 


Cox Electronics Radio Shack 


Coortenay 


Rick's Music 8c Stereo 






Usercom Systems, Inc. 


TEXAS 

Brenham 

Elgin 

Orange 




Dawson Creek 


Bell Radio 8c TV 






Walden Books 

World Wide Media Services 


Moore's Electronics 


Golden 
Kelowna 


Taks Home Furnishings 
Telesoft Marketing 




N. White Rains 
Pawling 


Software City 

Universal Computer Service 


The Homing Pigeon 
Northway Books & News 


Langley 

N. Vancouver 


Langley Radio Shack 
Mlcrowest Distributors 




Rochester 


Village Green 


VIRGINIA 




Nelson 


Oliver's Books 






World Wide News 


Gafton 


Electronics Marketing 


Parksvllle 


Parksvllle TV 




Wocdhaven 


Spectrum Projects 


Norfolk 


l-O Computers 


Pentlcton 


DJ.'S 




NORTH CAROLINA 

Aberdeen King Electronics 
Radio Shack 


Richmond 

WASHINGTON 

Seattle 


Software City 
Adams News Co.. Inc. 


Salmon Arm 

Sidney 

Smithers 


Four Comer Grocery 
Matrix Computing 
Sidney Electronics 
Wall's Home Furniture 




Cary 
Charlotte 


News Center In Cary village 
Newsstand Inf I 


Tacoma 


B 8c 1 Magazines 8; Books 
Nybbles 'N Bytes 


Squamish 
100 Mile 


Kotyk Electronics 




Havlock 


Papers & Paperback 
Computer Plus 


WEST VIRGINIA 




House 


Tip Top Radio 8c TV 




Hickory 
Marion 


C Books & Comics 
Boomers Rhythm Center 


Huntington 
Logan 


Nick's News 

Stan's Electronics 8c Radio Shack 


MANITOBA 

Altona 


LA Wiebr Ltd. 




Wilmington 

OHIO 

Blanchester 
Conton 
Chardon 
Cincinnati 


JB's Newsstand 


Madison 
Parkersburg 


Communications, LTD 
Valley News Service 


Lundar 
Morden 


Goranson Elec. 
Central Sound 




JR Computer Control 
Little Professor Book Center 
Thrasher Radio & TV 
Clnsoft 


WISCONSIN 

Applelon 

Cudahy 

Ladysmlth 


Badger Periodicals 
Cudahy News & Hobby 
Electronics. Etc. 


The Pas 
Selkirk 
Virden 
Winnipeg 


Jodi's Sight 8c Sound 
G.L Enns Elec 
Archer Enterprises 
J 8c J Electronics Ltd. 




Columbiana 


Fidelity Sound 8c Electronics 


Milwaukee 


Book Tree 


NEW BRUNSWICK 






Coshocton 


Utopia Software 




Booked Soila 

Booked Solid II 

Harvey Schwartz Bookshop 


Moncton 


Jeffries Enterprises 




Dayton 


Huber Heights Book & Card 
Wilke News 




Sussex 


Dewltt Elec. 




Fairbom 


News-Readers 




Univ. of Wisconsin Bookshop 


NEWFOUNDLAND 




Kent 
Kenton 


The News Shop 

T.W. Hogan 6c Associates 


Mlnocqua 
WYOMING 


Island Technologies 


Botwood 
Carbonear 


Seapcrt Elec. 
Slade Realties 




Lakewood 


Lakewood International News 


Casper 


The Computer Store 


NOVA SCOTIA 






Uma 


Brunner News Agency 






Halifax 


Atlantic News 




Mlamlsburg 
Mount Orab 


Edu-Caterers 

Wilke News 

Mount Orab Radio Shock 


ARGENTINA 

Cordoba 


Informatlca Y Telecomunicaciones 


ONTARIO 

Aurora 


Compu Vision 




Rocky River 

Toledo 

Xenia 


Programs Unlimited 
Leo's Book 8c Wine Shop 
Fine Print Books 


AUSTRALIA: 

Klngsford 


Paris Radio Electronics 


Concord 
Exceter 
Hanover 
Huntsville 


Ingram Software 
J. Macleane 8c Sons 
Modern Appliance Centre 
Huntsville Elec. 




OKLAHOMA 




CANADA: 




Kenora 


Donny "B" 




Oklahoma 




ALBERTA 




Kingston 


T.M. Computers 




City 


Merit Micro Software 


Banff 


Banff Radio Shack 


Llstowel 


Modern Appliance Centre 




Taklequah 


Thomas Sales. Inc. dba Radio Shack Blalrmore 


L 8t K Sports & Music 


South River 


Max TV 




Tulsa 


Steve's Book Store 


Bonnyvllle 
Brooks 


Paul Tercler 

Double "D" AS.C. Radio Shack 




Dennis TV 




OREGON 

Portland 


Fifth Ave. News 


Calgary 


Billy's News 

Kelly Software Distributors 


QUEBEC 

LaSalle 


Messageries de Presse Benjamin Enr. 




PENNSYLVANIA 




Claresholm 


Radio Shack Associated Stores 


Pont. Rouge 


Boutique Bruno Laroche 




Allison Park 


Software City 


Drayton Valley 


Langard Electronics 


SASKATCHEWAN 






Altoona 


Newborn Enterprises 


Edmonton 


CMD Micro 


Assinibola 


Telstar News 




Brookville 


Larry's Stereo Shop 


Edson 


Radio Shack 


Estevan 


Kotyk Electronics 




Malvern 


Personal Software 


Fairview 


D.N.R. Furniture & TV 


Moose Jaw 


D&S Computer Place 




Philadelphia 


City Software Center 


Fox Creek 


Fox City Color 8: Sound 


Nipiwan 


Cornerstone Sound 






Newsy 




A.S.C. Radio Shack 


Regina 


Regina CoCo Club 




Phoenixville 


Stevens Radio Shack 


Ft. Saskatche- 






Software Supermarket 




Pittsburgh 


Ail-Pro Souvenlers 


wan 


Ft. Mall Radio Shock. ASC 


Saskatoon 


Everybody's Software Library 




Pleasant Hills 


Pitt Computer & Software 


Grande 




Shellbrooke 


Gee. Loberge Radio Shack 




Temple 


Software Comer 


Cache 


The Stereo Hut 


Tisdole 


Paul's Service 




Wind Gap 


Micro World 


Grande 




Unity 


Grant's House of Sound 




York 


The Computer Center of York 


Centre 
Hlnton 


The Book Nook 
Jim Cooper 


YUKON 






RHODE ISLAND 




Innlsfail 


L 8; S Stereo 


Whitehorse 


H 8c O Holdings 




Warwick 


Software Connection 


Leduc 


Radio Shack Associated Stores 








SOUTH CAROLINA 

Charleston Hts. Software Haus. Inc. 
Gaflney Gaffney Book Store 
Greenville Palmetto News Co. 
Spartanburg Software City 
Union Fleming's Electronics 


Lethbrldge 
Uoydmlnster 
Okotoks 
Peace River 

St. Paul 
Stettler 


Datatron 

Lloyd Radio Shack 

Okotoks Radio Shock 

Radio Shack Associated Stores 

Tavener Software 

Walter's Electronics 

Stettler Radio Shack 


JAPAN 
Tokyo 

PUERTO RICO 

San Juan 


America Ado, Inc. 
Software City 




TENNESSEE 




Strathmore 


Wheatland Electronics 








Chattanooga 


Anderson News Co. 
Guild Books & Periodicals 


Taber 
Westlock 


Pynewcod Sight 8: Sound 
Westlock Stereo 








Dickson 


Highland Electronics 


Wetaskiwln 


Radio Shock 










Also available at all B. Dalton Booksellers, and selected Coles Bookstores, 






Walden books, 


Pickwick Books 


, Encore Books, Barnes & Noble, 


Little 






Professors, Tower Book & Records, Kroch's & Brentan 


o's, and Community 






Newscenters. 
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AD VERTISER INDEX 

We encourage you to patronize our advertisers — all of whom support the 
Tandy Color Computer. We will appreciate your mentioning THE rainbow when 
you contact these firms. 



Alpha Products 21 

Ark Royal Games 33 

Bytes Bits & Chips 142 

Canyon County Devices 154 

Cer-Comp 127 

Challenger 85 

Cinsoft 135 

Clearbrook Software 

Group 177 

CNR Engineering 157 

CoCo Cat Anti-Drug ad 113 

Cognitec 83 

Colorware 22, 23 

Computer Center 35 

Computer Island 101 

Computer Plus 3 

Computerware 50, 51 

D.P. Johnson 199 

Dayton Associates of 

W. R. Hall, Inc 128 

Delphi 122, 123 

Derringer 

Software 17, 147, 151 

Diecom IFC 

Duck Productions 155 

F.M. Technology 201 

Federal Hill Software 111 

Frank Hogg Laboratories ...197 



Gimmesoft 55 

Hard Drive Specialists 163 

Hawkes Research 

Services 134 

Hemphill Electronics 15 

HJL div. of Touchstone 

Technology, Inc BC 

Howard Medical 34, 210 

Inventive Solutions 54 

J & M Systems 31, 119 

J & R Electronics 97 

Jason Guilbeau 32 

Kelly Software 

Distributors 136 

Metric Industries 13 

Micro Works, The 133 

Microcom Software 9, 11, 95 

Microtech Consultants 

Inc 81 

MicroWorld 29 

Moreton Bay 145 

Novasoft 56 

Other Guys Software, The 49 

Owl-Ware 85, 86, 87 

PCM 124 

Perry Computers 16 

Preble's Programs, Dr IBC 

Prickly-Pear Software 195 



Probitas 117 

PXE Computing 7 

Radio Shack 105, 107 

Rainbow Adventure 

Book III 65 

Rainbow Binder 185 

Rainbow Bookshelf 209 

Rainbow Gift 

Subscription 130 

Rainbow on Disk 158 

Rainbow on Tape 190 

Robotic Microsystems 165 

Seca 181 

Software House, The 167 

Spectogram 79 

Spectrosystems 143 

Spectrum Projects 

Inc 67, 69, 71 

Speech Systems 

39,40, 41, 42, 43, 44, 45 

Sugar Software 175 

Sunrise Software 137 

T & D Software 14, 103 

Tepco 116 

Tom Mix Software 57 

True Data Products ....172,173 

Woodstown Electronics 49 

Zebra Systems 25 




ID Call: 



Shacklelord, Nolan, Davis, Gregg and Associates 

Cindy Shackleford, president 

Marian Nolan Carpenter 

Advertising Representative 

P.O. Box 725 

51 6-1 89th SL Court East 

Spanaway, WA 98387 

(206) 847-9901 



Call: 

Kim Vincent 

Advertising Representative 

The Falsoft Building 

9509 U.S. Highway 42 

P.O. Box 385 

Prospect, KY 40059 

(502) 228-4492 



Call: 

Jack Garland 

Garland Associates, Inc. 

10 Industrial Park Road 

Hingham, MA 02043 

(617) 749-5852 



208 



THE RAINBOW May 1987 



The Rainbow Bookshelf 




Fill out your Co Co library 
with these selections 



The Complete Rainbow Guide to OS-9 

Authors Dale Puckett and Peter Dibble show how to take 
advantage of OS-9's multitasking and multiuser features. An easy- 
to-read, step-by-step guide packed with hints, tips, tutorials and free 
software in the form of program listings. 
Book $19.95 
Disk Package $31 (2 disks, book not included) 



The Rainbow Introductory Guide to Statistics 

Dr. Michael Plog and Dr. Norman Stenzel give a solid introduction 
to the realm of statistical processes and thinking for both the 
beginner and the professional. 
Book $6.95, Tape or Disk $5.95, Package $11.95 



The First Rainbow Book of Adventures 

Contains 14 winning programs from our first Adventure contest. 
Includes Sir Randolph of the Moors, Horror House, One Room, Dr. 
Avaloe and more. Plus hints, tips on solving Adventures. 
Book $3.50, Tape $3.50 



The Second Rainbow Book of Adventures 

Featuring 24 of the most challenging Adventure games ever 
compiled. Meet the Beatles and battle the Blue Meanies, find a 
hidden fortune, or win the heart of a mysterious princess. Ring 
Quest, Secret Agent Man, Dark Castle, Curse of Karos and more! 
Book $13.95, Tape $13.95 



The Third Rainbow Book of Adventures 

The excitement continues with 19 new Adventures. Discover 
backstage intrigue at the London Theatre, attempt a daring space 
rescue, or defeat evil in the year 2091 as a genetic android. Evil 
Crypt, Spymaster, Time Machine, The Amulet, and that's only the 
beginning! 
Book $11.95, Tape $9.95, Two-Disk Set $14.95 




The Rainbow Book of Simulations 

20 award-winning entries from THE RAINBOW'S first Simulations 
contest. You are a Civil War Commander, an air traffic controller, 
a civil defense coordinator, or a scientist on Mars . . . your wits are 
on the line. 
Book $9.95, Tape $9.95 

The Second Rainbow Book of Simulations 

The 16 winners from our second Simulations contest. Fly through 
dense African jungle, bull your way down Wall Street, lead a bomb 
squad, or try your hand at Olympic events. Test your skills and 
talents. Book $9.95, Tape $9.95, Disk $10.95 

Coming soon: A complete Rainbow guide to 
using OS-9 Level II on the Color Computer 3 



i~" 



ZIP 



/ want to start my own Rainbow Bookshelf! 

Name 

Address 

City 

State 

□ Payment Enclosed, or D Charge to: 

□ VISA □ MasterCard □ American Express 

Account Number 

Card Expiration Date 

Signature 



Please send me: 

D The Rainbow Book of Simulations 

D Rainbow Simulations Tape 

D The Second Rainbow Book of Simulations 

D Second Rainbow Simulations Tape 

D Second Rainbow Simulations Disk 

D The Complete Rainbow Guide to 0S-9 (book only) 

D Rainbow Guide to OS-9 Disk Package (2 disks) 

□ The Rainbow Book of Adventures (first) 
D Rainbow Adventures Tape (lirsi) 

D The Second Rainbow Book ol Adventures 
D Second Rainbow Adventures Tape 
G The Third Rainbow Book ol Adventures 
D Third Adventures Tape 
Q Third Adventures Disk Set (2 disks) 

□ Introductory Guide to Statistics 

D Guide to Statistics Tape or Disk (indicate choice) 
D Guide to Statistics Package (indicate choice ol tape or 

Add $1.50 per book Shipping and Handling in U.S 

Outside U.S., add $4 per book 

Kentucky residents add 5% sales tax 
(Allow 6 to 8 weeks lor delivery) 



$ 9.95 . 
$ 9.95 _ 
$ 9.95 . 
$ 9.95 . 
$10.95. 
$19.95 _ 
$31.00 _ 
$ 3.50 £-W5-_ 
$ 3.50 JJJr95-- 
$13.95 - 
$13.95 - 
$11.95- 
$ 9.95 - 
$14.95 _ 
$ 6.95 _ 
$ 5.95 - 
$11.95 _ 



disk) 



Total 



Mail to: Rainbow Bookshelf, The Falsoft Building, P.O. Box 385, 

Prospect, KY 40059 

To order by phone (credit card orders only) call (800) 847- 

0309, 8 a.m. to 5 p.m. EST. For other inquiries call (502) 

228-4492. 

Please note: The lapes ond disks offered by The Rainbow Bootcsnelf are not stand-alone products. 
Thai is, they are intended to be an adjunct and complement to Ihe books. Even If you buy tho tape 
or disk, you will still need Ihe appropriate book. OS-9* is a registered trademark of the Microware 
Systems Corporation. 




Save s 80 on Magnavox Monitors 
Magnavox CM8505 RGB Analog only $220!! 




MONITORS 




1 22A Zenith 1 2 " Amber Screen offers 
the same 640 dots x 200 dots resolu- 
tion at 15MHz as the 123A and a 90-day 
warranty valid at 1200 locations. 



$88 



('7 shipping) 

MASNAVOX 
8 CM 515 has 

analog RGB for CoCo 3, TTL RGB 
for Tandy 1000 or IBM PC's, and 
composite color for CoCo 2 and 3. 
Built-in speaker. 14" screen with 
640 dot x 240 line resolution. Plus 
2 years parts and labor warranty. 

reg. list S499 

SAVE 
$100 



123A 12" 

This 12" green screen high resolution 
monitor offers 80 column capability, 
Zenith quality and a 30-day warranty 
valid at any of Zenith's 1200 locations. 

Retail $149 
Our price 
(S7 shipping) 

All monitors require an amplifier cir- 
cuit to drive the monitor and are 
mounted inside the color computer. 
They attach with spring connectors 
with two wires extending out of the 
computer, one for audio and one for 
video. CoCo 3 does not require an 
amplifier circuit. 

VA-1 for monochrome monitors only, 
fits all color computers 



$67.50 

REPACK 



$24.45 

ime or color, fits all 

$39. 45 



$298 




+ S14 Shipping 

CC-3 Magnavox RGB cable. 

only ' I 9.9 O with 
Magnavox Monitor order. 
$29.95 w/o monitor. 



( s 2 shipping) 

VC-4 for monochrome or color, fits all 
color computers 
($2 shipping) 

MASNAVOX 

CM 8505 has analog 
RGB and TTL RGB and composite 
color Input. Built in speaker. 13" 
screen with 390 dots x 240 
resolution in RGB mode. Plus 1 
year parts & labor warranty. 

reg. list S299 

SAVE 
*80 



$220 

+ S14 Shipping 




UlllVC \J i " . Howards Drive gives you a 
DD-3 MPI drive, a CA-1 cable and a J&M DC-4 Disk Controller 



for only 



$178 45 

(55 shipping) 
Add $34 for a Disto DC-3. 



DOUBLE SIDED 
DOUBLE DENSITY 
360K 



GUARANTEE 

Howard Medical's 30-day guarantee is meant to eliminate the uncertainty- 
of dealing with a company through the mail. Once you receive our hard- 
ware, try it out; test it for compatibility. If you're not happy with it for any 
reason, return it in 30 days and we'll give you your money back (less 
shipping.) 

Shipping charges are for 48 states. 
APO, Canada and Puerto Rico orders slightly higher. 



DISK CONTROLLER 



pisi° 



Includes controller and C-DOS 4.0 
ROM Chip. 

^98 DC-3 
$2 shipping on all OISTO products 



ADD-ON BOARDS 



DC-38 includes 80 column capacity, 
parallel printer, real time clock, and all 
software $138 

DC-256 256K RAM Board includes 
software to access all RAM $Q() 



DC512 512K 
software 



RAM 



Board with 

$125 



DC-3C Clock Calendar and parallel 
printer port $40 



DC-3P Mini Eprom programmer in- 
cludes all software to program 2764 
or 27128 chips $55 

2764 8K Eprom 28 pin 

$8 50 each 

27128 16K Eprom 28 pin 

$8 50 each 

C-DOS 3 28 pin Eprom makes Disto 
controller compatible with CoCo 3 

$20 



SOFTWARE SPECIALS 



Payrol/BAS T " , 

* ('2 shipping) 

• Nonprotected basic modifiable 

• Tax tables built In for automatic 
state and federal calculation 

• Custom code for every state 

• 4 pay periods 

• 7 deductions 

• Prints checks 

• 100 employees 

• 30 ledger numbers for checks 
other than payroll 

• Check register includes monthly 
or weekly federal deposit amount 

• Enter, update, delete employees, 
company and check information 

■ Print payroll and nonpayroll 
checks 



Payrol/BAS™ 
30 Day Trial 

$79.95 



VIP LIBRARY 

Softlaw's Integrated package in- 
cludes VIP writer terminal, data 
base, call and disk zap which can 
fix a diskette that is giving I/O 

$125 

(52 shipping) 



MEMORY 

Memory for CoCo 3 PC memory 
board plugs into the spare slots in- 
side the computer and can be 
populated with 256K ram chips. 
Completely solderless with com- 
plete easy to Install instructions. 

$49.50 

PC Memory board with 256K S 99 
PC Memory board with 512K s 118 

Software spooler and RAM disk 

for lightning quick response or no 
disk swapping drive backup lor 1 
drive system and printer spooler to 
free computer during long listings. 

$19.45 

($2 shipping on Memory 
products) 



64-2 for CoCo 2. Kit requires one 
solder point, no trace cuts. 

(<2 shipping) $24.45 

64-E1 for E Boards with complete 
instructions. Remove old chips 
and replace with preassembled 
package— no soldering or trace 
cuts, 

(»2 shipping) 28.45 

64-F1 for F Boards. No soldering 
needed. Capacitor leads must be 
cut. 

(»2 shipping) $24.45 

64-22 Two chip set for 26-3134A 
and B, 26-3136A and B. Koren Col- 
or Computers require 1 solder 
point. 

28.45 



('2 shipping) 



Howard Medical Computers 1690 N. Elston Chicago, U_ 60 




ORDERS 



s(800) 443-1444 



INQUIRIES AND ORDER STATUS 

(312) 278-1440 



00 Mun Fii 

1 IHI S.II 



I VISA • MASTERCARD • AMERICAN EXPRESS 
COD OR CHECKS • SCHOOL P.l 



Dr. Preble's Programs 
Striking A Blow For 




". . . Freedom is nothing else but a chance to be better , 

— Albert Camus 



*** Mental Freedom *** 

for CoCo 1, 2 and 3! 

A Thought-Controlled Video Challenge 

We call il The Preble Thoughtware. 

DOES GREEN BLOOD flow in your veins like Mr. Spock? Is your mind well 
ordered? Or is your mind a mass of conflicting emotions like most 
humans? 

THOUGHTWARE may answer these questions and more. 

IMAGINE! Some day, a computer so advanced that it responds to your very 
thoughts and emotions. Imagine, some day, thought-controlled 
graphics: levitation and materialization! 

PLUG IN YOUR MIND and UNHOOK YOUR JOYSTICKS - that day is 
now! The Radio Shack Color Computer has many ad- 
vanced capabilities, just waiting to be tapped. Dr. Preble's 
Programs combines the advanced technology of the CoCo 
with the amazing Radio Shack BIOFEEDBACK MONITOR 
to bring you "Preble Thoughtware." 

THOUGHT-CONTROLLED VIDEO CHALLENGE? Unlike any 
video game you have ever played, Thoughtware tests your 
ability to handle stress, to remain calm under adverse 
circumstances. 

LIGHTNING FAST reflexes will do you no good here, unless you 
lirst tame the tickle dragon of your mind. 

DO YOU HAVE SELF-CONTROL? Many people can keep a 
"Poker Face" even when they are worried so that others 
may not notice; but can you really stop the worry itself? Thoughtware 
will find out! 

AND IT TALKS! Did you know that the CoCo can produce incredibly realistic 
digital speech without a special speech synthesizer? And I mean really 
high quality speech! Forget the mechanical robot voice. This voice 
quality is so good, it sounds human! Honest. Best of all, no extra 
hardware is needed for speech. None. The CoCo produces this amazing 
digital speech all by itself (with a wee bit of programming by Dr. Preble). 

THOUGHTWARE — Next time your friends ask what your computer can do, 
show them the Preble Thoughtware! 

Requires Radio Shack's Biofeedback Monitor Catalogue W63-675 

The Preble Thoughtware — TAPE $27.95 * s/h, on DISK $29.95 • s/h 




*** Basic Freedom *** 

for The Color Computer 3 
(with versions for CoCo 1 & 2) 

A Full Screen Editor for BASIC Programming 

We call it EDITOR 3. Chris Babcock wrote a pure, efficient Machine Language 
program to open a new dimension of ease and power for anyone typing in 
a BASIC program. 

Here are your BASIC Freedoms! 



' ls -~- -=-^ 



FULL CURSOR MOVEMENT — Use the arrow keys to move anywhere on a 
screen. If you are using a Color Computer 3, then even the 40 or 80 
column screen is supported! 

INSERT, CHANGE or DELETE CHARACTERS anywhere on the 
screen. Simply move to what you wish to change, change 
it and continue working! 
LOWERCASE COMMANDS are OK! EDITOR 3 lets you type in 
lowercase any time or all the time. Lowercase command 
words are automatically translated to uppercase for BASIC. 
Of course, lowercase text within quotes stays lowercase. 
This is great when typing wiht the CoCo 3's 40 or 80 column 
mode with true lowercase! 
MERGE LINES within a program with just a few keystrokes! 
AUTO KEY REPEAT — Hold down any key and it will repeat. 
INVISIBLE — Once EDITOR 3 has been loaded in, it is activated 
S{ _ Y\ l^^with a single keystroke! It hides itself out of the way of other programs 
and can be turned oft any any time. Pressing RESET will not hurt 
EDITOR 3! 
EASY TO USE — Installation takes seconds! Well-written goof-proof manual 

included. 
COCO 1 & 2 — Yes, even though this program was conceived for the powers 
of the new CoCo 3, we still support the previous Color Computers. They 
too, need their BASIC Freedom! 
EDITOR 3 — So easy and handy, you'l 

it! 
Available on DISK only for CoCo 3 @ $29.95 + s/h 

CoCo 1/2 version can not support 40 or 80 column screens CoCo 1/2 version 
is available on TAPE for $27.95 t s/h or DISK for $29.95 + s/h. 




I never want to run your CoCo without 



Also Available for CoCo 1 & 2 only: 

VDOS, the UnDISK: Save multiple programs in memory! Works with or without a disk 
drive. TAPE $27.95 + s/h, DISK $29.95 * s/h 

VDUMP, for the UnDISK: Save multiple programs in a single file! $14.95 • s/h on tape. 
VPRINT, for the UnDISK: Printout UnDISK Directory! $9.95 * s/h on tape. 



Check, Money Order, MasterCard, VISA or COD accepted. For Shipping to USA and 
Canada add $1.50, to other countries add $5.00. 



Order From 
Dr. Preble's Programs 

6540 Outer Loop 

Louisville, KY 40228 

(502) 966-8281 

Technical questions answered 
Monday, Wednesday, Friday 



The Ultimate 
Color Computer 



Enhancements 
for Productivity 
from HJL Products 





Now available for all 
models, including CoCo3 



To achieve maximum productivity with 
your Color Computer, you have to make 
it as easy as possible to get information 
Into and out of the system. 

This is why we developed the HJL 
family of high-performance 
enhancements for ALL MODELS of the 
Color Computer. £ f/ow 

The Keyboard - $7fc§9 --»<r" 

The overwhelming favorite of serious* 
Color Computer users worldwide, the 
HJL-57 keyboard has the smooth, 
consistent feel and reliability you need 
for maximum speed with minimum 
input errors. Includes 4 Function Keys 
and sample function key program. 
Installs in just a few minutes with no 
soldering. * //^ 

The Numeric Keypad • Wft-W-Sj* 

The NumberJack is a self-contained, 
cable-connected keypad for heavy-duty 
number-crunchers. Besides the number 
keys, it has all the cursors, symbols 
and math keys, including autoshifted 
(one-touch) ADD and MULTIPLY. 
Comes complete with 3-foot cable and 
all necessary connectors for quick and 
easy installation without soldering. 



The Monitor Adapter - $25.95 

This universal driver works with all 
monochrome monitors, and is easily 
Installed without clips, jumpers or 
soldering (except in some later CoCo 2s 
with soldered-ln video chips). Here's 
crisp, clear, flicker-free monitor output 
with all the reliability you've come to 
expect from HJL Products. 

The Monitor - $89.95 

The GoldStar high-resolution amber 
monitor brings you the monochrome 
display that's preferred by most 
computer professionals today. Once 
you've used it you'll never connect your 
computer to a TV set again. The 12- 
inch diagonal CRT has an etched non- 
glare faceplate. (Requires adapter sold 
above) jl. ffg^ 



The BASIC Utility 

Quick Basic Plus, a high-performance" 
programming utility, can be used with 
any color computer that has four func- 
tion keys. 26 pre-defined BASIC 
statements, 10 user-defined macros at 
a time (you can save as many sets of 
macros as you like), automatic line- 
numbering, word wrap, global search, 



and instant screen dump to printer, 
make this software the BASIC pro- 
grammer's dream come true. Comes 
with re-legendable 3-way reference 
chart. Specify disk or cassette. 

The HJL Warranty 

Every HJL product comes with a full, 
one-year warranty and the exclusive 
HJL 15-day unconditional guarantee 
(except software). 

Pick a Pair & Save 15% 

Now, for a limited time, we'll give you 
15% off the price of any two or more 
products shown here. Just mention 
this ad when you order. 

Call Now, Toll Free 

1-800-828-6968 

In New York 1-800-462-4891 
International calls: 716-235-8358 



Ordering Information: Specify modal (Original, F-var9lon, or CoCo 2 Model Number). Payment by C.O.D., check, 
MasterCard, or Visa. Credit card customers Include complete card number and expiration date. Add $2.00 for 
shipping, 3.50 to Canada; except monitors (call lor shipping charges before ordering monitors). New York state 
residents add 7% sales tax. Dealer Inquiries Invited 
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PRODUCTS 

Div. of Touchstone Technology Inc. 

955 Buffalo Road • P.O. Box 24954 
Rochester, New York 14624 



